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This is a major revision of, and obsoletes, GC21-5111-0. Extensive changes have been 
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periodically made to the information herein; before using this publication in connection 
with the operation of IBM systems, refer to the latest /8BM System/3 Bibliography, 
GC20-8080, for the editions that are applicable and current. 


Requests for copies of IBM publications should be made to your IBM representative or 
to the IBM branch office serving your locality. 


A Reader’s Comment form is provided at the back of this publication. If the form has 


been removed, comments can be addressed to 1BM Corporation, Publications, Depart- 
ment 245, Rochester, Minnesota 55901. 


©Copyright International Business Machines Corporation 1975 


This manual contains introductory material on the IBM 
3340 Direct Access Storage Facility. It is intended for users 
of the IBM System/3 Model 15 (System Control Program 
5704-SC1) who are interested in the programming aspects 
of the 3340. 


This manual is organized into four chapters. The first 
chapter provides a general description of the 3340 and the 
IBM 3348 Data Module and outlines the system 
requirements. The second chapter describes system support 


information and furnishes some programming considerations. 


The third chapter identifies the system service programs. 
The fourth chapter briefly describes the program products 
as they apply to the 3340. Information about the 3340 
data module format, calculating file size, and 3340 
operating instructions is included in the appendixes. 


Specific information can be referred to by consulting the 
table of contents or the index. Coding information and 
examples are not discussed in this manual. 


Prerequisite Knowledge 


You should be familiar with the related publications, basic 
programming concepts, the operation of the components 

of the System/3 Model 15, and the application and informa- 
tion requirements of your organization. 


Related Publications 


Additional information about the 3340 Direct Access Stor- 
age Facility can be found in the following publications: 


© /BM Reference Manual for 3340 Disk Storage, 
GA26-1619 


@ /BM 3348 Data Module Handling Procedures, 
GA26-1625 


Additional information about the Model 15 can be found 
in the following publications: 


@ /BM System/3 Model 15 Introduction, GC21-5094 


e@ /BM System/3 Models 8, 10, 12, and 15 Components 
Reference Manual, GA21-9236 
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@ /BM System/3 Model 15 Operator’s Guide, GC21-5075 


@ /BM System/3 Model 15 System Control Programming 
Reference Manual, GC21-5077 


© /BM System/3 Overlay Linkage Editor Reference 
Manual, GC21-7561 


@ /BM System/3 Model 15 System Generation Reference 
Manual, GC21-7616 


@ /BM System/3 Model 15 System Messages, GC21-5076 


© /BM System/3 Model 75 System Control Programming 
Macros Reference Manual, GC21-7608 


@ /BM System/3 Disk Concepts and Planning Guide, 
GC21-7571 


@ /BM System/3 RPG I! Reference Manual, SC21-7504 


@ /BM System/3 Subset American National Standard 
COBOL Reference Manual, SC28-6452 


© /BM System/3 FORTRAN IV Reference Manual, 
SC28-6874 


@ /BM System/3 Basic Assembler Reference Manual, 
SC21-7509 


© /BM System/3 Disk Sort Reference Manual, SC21-7522 


@ /BM System/3 Communications Control Program Pro- 
grammer’s Reference Manual, GC21-7579 


@ /BM System/3 Model 15 Communications Control Pro- 
gram System Reference Manual, GC21-7620 


@ /BM System/3 Communications Control Program Ter- 
minal Operator’s Guide, GC21-7580 


e@ /BM System/3 Model 15 Communications Control 
Program System Operator’s Guide, GC21-7619 


@ /BM System/3 Model 15 Users Guide to Spooling, 
GC21-7632 


For a complete list of System/3 publications, see /BM 
System/3 Bibliography, GC20-8080. 
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The 1BM 3340 Direct Access Storage Facility offers 
increased file capacity and improved performance over 
both the IBM 5444 and 5445 Disk Storage Drives. Two, 
three, or four 3340 drives can be online to the IBM 
System/3 Model 15. The 3340 uses the IBM 3348 Data 
Module (Model 70) as a storage medium. 


SYSTEM REQUIREMENTS 


For information concerning the minimum system con- 
figuration for the 3340 Direct Access Storage Facility 
and additional devices supported, see one of the following 
Model 15 publications: 


@ /BM System/3 Model 15 Introduction, GC21-5094 


@ /BM System/3 Model 15 System Generation Reference 
Manual, GC21-7616 


3340 DISK STORAGE CONCEPT 


The 3340 provides direct access storage for the System/3 
Model 15. The 3340 is a modular, high-speed, large capacity 
storage facility for data base/data communications or general- 
purpose storage. 


The 3340 drive uses the 3348 Data Module as the storage 
medium. The 3340 contains the necessary mechanical and 
electrical components to house, load, provide air filtration 
for, and drive the 3348 Data Module. Together, a 3340 and 
3348 have: 


@ Less than 20 seconds start time 


@ 25 milliseconds average access time 
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@ 10.12 milliseconds average rotational delay 
or 


10.8 milliseconds for planning purposes 


® 885,000 bytes per second nominal data transfer rate 


Unique to the 3340, when compared to the 5444 and 5445 
disk storage drives, are the following basic features: 


@ A data module instead of a disk pack 
@ Defect skipping 


The data module is a sealed cartridge that contains disks, a 
spindle, read/write heads, and access arms. The use of the 
data module provides the following advantages for the 
System/3 Model 15: 


@ Drive capacity is approximately 51 megabytes. 


@ Preventive maintenance of the heads, disks, and spindle 
is eliminated by reducing the exposure to outside con- 
tamination. 


® Reliability is improved by dedicated read/write heads. 
Each head reads only the data it previously wrote. 


Defect skipping allows data to be written before and after 

a surface defect. Thus, all of the track can be used except 
for that portion containing the defect. This also eliminates 
the access time that was formerly required to move the 
read/write heads to an alternate track. Only one defect per 
half-track can be skipped in this manner; for second and sub- 
sequent defects, an alternate track must be assigned. 


Byte capacities remain at stated maximums even with known 
defects. The user need not be concerned with managing 
defect skipping since the 3340 automatically handles access- 
ing of data on all subsequent read or write operations on 
that track. 
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The following 3340 features, available on System/370, 
are not available on System/3: 


@ Remote switch attachment 
® String switch 
® Fixed head feature 


® Rotational position sensing 


3340 CONFIGURATION 

The 3340 configurations for the Model 15 include combina- 
tions of the 3340 Models A2 (control and two drives), B1 
(one drive), and B2 (two drives), Figure 1-1. 

One Model A2 is a prerequisite for each 3340 subsystem. The 
desired number of drives is obtained by attaching one 3340 
Model B71 or one 3340 Model B2 to the 3340 Model A2 
drive. Thus the system can have two, three, or four drives 
attached. 


Control 


The control unit, part of the 3340 Model A2, performs the 
following functions: 


@ Interprets and executes macro-orders from the storage 
control 


@ Regulates the storage control and disk storage interfaces 


@ Checks the integrity of data by error detection and error 
correction analysis 


@ Furnishes status to the system 


@ Performs diagnostic evaluation of the 3340 subsystem 


Drive 
Each drive of the 3340 performs the following functions: 


@ Responds to commands from the 3340 Model A2 
(control) 


® Houses, loads, provides air filtration for, and drives the 
3340 data module 
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@ Positions the access mechanism with voice-coil drive and 
maintains track following via an electronic servo system 


@ Selects the head 

@ Reads or writes data 

@ Provides safety and servicing information for subsystem 
and system evaluation 

TIMING 

The total access and data transfer time consists of access 

motion, head selection (negligible), rotational delay, and 

data transfer times. 

Access Motion Time 

Access motion time is the time required to position the 

access mechanism at the specified cylinder. If the access 

mechanism is already at the proper cylinder, access motion 


time is zero. If the access mechanism is moved, the follow- 
ing times are required: 


Minimum — 10 milliseconds 
Average — 25 milliseconds 
Maximum — 50 milliseconds 


ROTATIONAL DELAY 


Rotational delay is the time required for the desired record 
area to reach the read/write head so that data transfer can 
begin. The average rotational delay for a 3340 is 10.12 
milliseconds. However, due to the way the 3340 is support- 
ed by System/3 programming, an average rotational delay 
of 10.8 milliseconds should be used for planning purposes. 


Data Transfer 


Nominal data transfer rates for the disk drives are: 


Bytes per second — 885,000 
Microseconds per byte — 1.13 


1BM 3340 Model A2 (Control and Two Drives) 





IBM 3340 Model B1 (One Drive) 





!BM 3340 Model B2 (Two Drives) 





Figure 1-1. 3340 Configuration Models 
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Comparative Access Times 


Figure 1-2 illustrates the access times for the 5444 and 5445 
disk storage drives and the 3340. 


3340 DATA MODULE 


On the System/3 Model 15, the 3340 drives use the IBM 
3348 Model 70 Data Module. Due to the formatting re- 
quired by System/3, the capacity of a data module is 51 
megabytes. This chapter describes the Model 70 data mod- 
ules as used by System/3. The format of the data module is 
described in Appendix A. 


Physical Characteristics 





Height — 8 inches 
Width — 16 inches 
Maximum tength — 18 inches 
Shipping weight -- 23 pounds 


Storage Characteristics 


Figure 1-3 shows the relative storage characteristics of the 
5444 and the 5445 disk storage drives and the 3340 for the 
System/3 Model 15. The term record is used in this figure to 
indicate a physical record or sector on the disk. System/3 
programming supports logical records that span physical 
records. 


Use of the Data Module 


Each 3340 data module is divided into a main data area 
and four simulation areas. Following is a graphic repre- 
sentation of these areas of a 3340 subsystem: 


Four 5444 
Simulation Areas 
Drive Main Data Area enna. 
1 
2 
3 
4 





Twelve Simulation 
Backup Areas 


Main Data Area 


The main data area of each module provides 40.8 mega- 
bytes of data storage. These areas are referred to as follows: 


D1 = Main data area on 3340 drive 1 
D2 = Main data area on 3340 drive 2 
D3 = Main data area on 3340 drive 3 
D4 = Main data area on 3340 drive 4 


5444 
(High Speed) 


Minimum access time 28 ms 25 ms 10 ms 


Average access time 126 ms 60 ms 25 ms 


Maximum access time 255 ms 130 ms 50 ms 


Data transfer rate 199,000 bytes/sec | 312,000 bytes/sec | 885,000 bytes/sec 
Rotational speed 1500 rpm 2400 rpm 2900 rpm (approx.) 
Nominal rotation time 40 ms 25 ms 20.2 ms 


Average rotational delay 20 ms 12.5 ms 10.1 ms 





Figure 1-2. Access Times for the 5444 and 5445 Disk Storage Drives and the 3340 


Bytes per record 256 

Records per track 24 20 48 
Bytes per track 6,144 5,120 12,288 
Tracks per cylinder 2 20 20 
Bytes per cylinder 12,288 102,400 245,760 
Cylinders per disk pack/data module” 100/200 200 207 


Bytes per disk pack/data module? 1,228,800/ | 20,480,000 | 50,872,320 
2,457,600 


Tracks per disk pack/data module” 200/400 4,000 4,140 
Records per disk pack/data module?” 4,800/9,600 80,000 198,720 
Maximum number of disk files per pack/module 50 1,000 1,000 


Maximum number of usable disk surfaces 8 80 24 


Maximum number of drives 23 4 4 


1 See 3348 Data Module Surface Format in Appendix A. 
2 Excluding alternate tracks and CE tracks. 
3 The 5444 contains two packs per drive. 


Figure 1-3. Characteristics of Disk Storage Drives for the System/3 Model 15 





Introduction 


1-5 


Page of GC21-5111-1 
Issued 5 December 1975 
By TNL: GN21-5366 


Simulation Areas 


Each 3340 data module used on System/3 contains four 
5444 simulation and simulation backup areas. The system 
uses the 5444 simulation areas in the same way it would use 
the 5444 disk storage drive. That is, all libraries (user Pro- 
grams, system programs, procedures, etc) are contained in 
the 5444 simulation areas. 


There are four 5444 simulation and simulation backup areas 
for each drive (a total of 16 for all four drives). Four of 
these 16 areas are available for general system use: 


Fi Simulation of fixed disk on 5444 drive 1 
R1 = Simulation of removable disk on 5444 drive 1 
F2 = Simulation of fixed disk on 5444 drive 2 
R2 Simulation of removable disk on 5444 drive 2 


It 


The location of these four 5444 simulation areas is fixed. 
F1 and R1 are always on 3340 drive 1; F2 and R2 are 
always on 3340 drive 2. The user can prevent (via an 
operator control command) the simulation of F2 and R2, 
so that offline multivolume files can be processed on D2. 


The remaining 12 simulation backup areas are accessible 
only by the 3340 simulation area program (SSCOPY). 


The 5444 simulation areas are related to a drive rather than 
to a data module. The module mounted on drive 1 contains 
the F1 and R1 areas, and the module mounted on drive 2 
contains the F2 and R2 areas. If the data module normally 
placed on drive 2 is placed on drive 1, the areas on drive 1 
would be accessed as F1 and R1 rather than as F2 and R2. 


Number of Bytes 


Data Module Format 


For use with the System/3 Model 15, a 3340 data module 
has the following format: 


Number Millions 
Cylinder of Tracks of Bytes Description 
0 20 0.25 Reserved for system 


use 


1-166 3,320 40.80 Main data area 


167-168 40 0.49 Alternate tracks 
169-208 800 9.83 Simulation areas 
209 8 0.10 Error statistics and 
CE tracks 
4,188 51.47 Total 


The online capacity (Figure 1-4) depends on the number of 
drives available to the program (a minimum of two drives 
is attached to the Model 15). 


The 5444 simulation areas are accessible by SCP (system 
control program) and program products; the simulation 

backup areas are accessible only by the 3340 simulation 
area program (S$SCOPY). 


Simulation Areas 


Number 5444 Simula- 
of Drives | Main Data Area | tion Areas 
40,796,160 4,915,200 
81,592,320 9,830,400 
122,388,480 9,830,400 
163,184,640 9,830,400 


Figure 1-4. Online Capacity of 3340 Drives 
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Simulation 
Backup Areas 


4,915,200 
9,830,400 
19,660,800 
29,491,200 





Other Use 
(Reserved) 


835,584 
1,671,168 
2,506,752 
3,342,336 


51,462,144 
102,924,288 
154,386,432 
205,848,576 


From a programming standpoint, the main data area of the 
3340 is supported in the same way as for the 5445, and the 
5444 simulation areas are supported in the same way as for 
the 5444, Highlights of the program support for the main 
data area are discussed in this chapter along with the con- 
siderations for using the 5444 simulation areas. 


ACCESS METHODS SUPPORTED 


For the main data area, sequential, indexed, and direct file 
organizations are supported in the same way as for the 
5445. 


For the 5444 simulation areas, sequential, indexed, and 
direct file organizations are supported in the same way as 
for the 5444, except that indexed files cannot be processed 


using the index (there is no support for processing the index). 


As a conversion aid, an indexed file in the 5444 simulation 
area can be copied to the main data area using the copy/ 
dump program, thereby creating an indexed file in the main 
data area. 


Files in the main data area can be single volume or multi- 
volume files; files in the 5444 simulation area can be single 
volume only, or multivolume files processed as single 
volumes. 


Figure 2-1 shows the file organizations and the access 
methods supported for the 3340 main data area. 


MULTIVOLUME FILES 


A file that exceeds the capacity of one data module can be 
continued on one or more subsequent data modules. Such 
files are known as multivolume files. A multivolume file 
can be online or offline. Online means that all the volumes 
(data modules) containing the file are running on drives 
during processing so that ail the records are available for 
processing. Offline means that only part of the file is avail- 
able for processing at any one time; the volumes must be 
removed and replaced with otner volumes to process the 
entire file. 


Online multivolume files must be multiple drives so that all 
data is online. D1, D2, D3, and D4 can be used for online 
multivolume files. 
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File Organization 








Access Methods Sequential Indexed Direct 































Load (output) 






Input 







Consecutive x x x 
Random by key x 
Random by relative record 

number x 


Sequential by key 
Sequential by limits 





Consecutive 
Random by key 
Sequential by key 
Update 
Consecutive 
Random by key 
Random by relative record 
number 
Sequential by key 
Sequential by limits 





Figure 2-1. File Organization and Access Methods Supported for the 
3340 Main Data Area 


The following restrictions apply to offline mu!tivolume 

files: 

@ D1 cannot be used for offline multivolume files because 
it contains the IPL (initial program load) system; there- 
fore, it must be mounted at all times. 


@ 1¥ all volumes are not mounted on the same drive, they 
can be mounted in a sequence as specified by the 
// FILE OCL statement. 


@ D2 cannot be used for offline multivolume files unless 
simulation of R2 and F2 has been stopped—via a 
SIMULATE (SM) command. (For information concern- 
ing the SIMULATE command, see {BM Syste:n/3 Model 
15 Operators Guide, GC21-5075.) 


Multivolume files in the simulation areas can be accessed 
only as single volume files. 


For more information concerning multivolume files, see 
/BM System/3 Disk Concepts and Planning Guide, 
GC21-7571. 
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PROCESSING LARGE INDEXED DISK FILES 


When additions are made to a large indexed file, the time 
needed to sort the keys of the index at the end-of-job step 
can be excessive. This sort time can be reduced by using a 
work file. 


The work file is used to merge the added keys into the 

index, and must be large enough to contain all of the keys 
added to the file. If the job step adds records to more than 
one indexed file, the work file must be large enough to con- 
tain all the keys for the file with the greatest number of addi- 
tions. If possible, the work file should be focated on a 
different drive from the indexed file whose keys are being 
sorted. If this is not possible, the work file should be as 
close as possible to the beginning of the file whose keys are 
being sorted. This minimizes the disk seek time. 


The work file must be named $INDE X45 and be located in 
the main data area. To determine the number of tracks 
required for the work file, use the following formula: 


256 
(key length +4) 
required for work file for the 3340 


number of adds + + 48 = tracks 


After dividing 256 by key length +4, the remainder should 
be dropped. After the other divisions, round the quotient 
to the next highest whole number. 


If the work file is not large enough to contain all the index 
keys, the keys are sorted in the normal manner without us- 
ing the work file. 


The work file can be used with multivolume files. However, 
it cannot be located on a pack that contains one of the 
offline volumes of a multivolume file. The pack containing 
the work file must remain online while the job is run. The 
work file must be RETAIN-S. If RETAIN-T or RETAIN-P 
is specified, the system forces it to RETAIN-S. 


For small indexed files of 10 tracks or less where the sort 
time is negligible, a work file will not improve performance 
and should not be used. 


To use the work file, no change is needed to your source 
program. Also, programs need not be recompiled to use 
this option; only one additional OCL FILE statement is 
needed. 
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INITIAL PROGRAM LOAD (IPL) 


IPL can be performed only from drive 1. Either the F1 
simulation area or R1 simulation area can be used for IPL. 
Therefore, the data module on drive 1 must be online at all 
times. Since write operations are done during IPL, the data 
module on drive 1 may never be read only (see Appendix 
C, Operating Instructions). 


SPOOLING 


Only the main data area can be used for the reader, 
punch, and print queues. 


SYSTEM SERVICE PROGRAMS 


System service programs are available for data module and 
file maintenance on the 3340. These programs are listed 

in Chapter 3. See /BM System/3 Model 15 System Control 
Programming Reference Manual, GC21-5077, for 
descriptions and examples of these programs. 


PROGRAM PRODUCTS 


Program products are used to satisfy specific application 
requirements. They operate under control of the Model 15 
SCP. See Chapter 4 in this manual for a discussion of the 
available program products. 


COMMUNICATIONS CONTROL PROGRAM (CCP) 


CCP supports files in the main data area in the same way as 
for the 5445 and in the 5444 simulation area in the same 
way as for the 5444. The access methods supported for the 
3340 apply to CCP except that no multivolume files are 
allowed. 


OCL FILE STATEMENT 


The 3340 is referenced through OCL statements at execu- 
tion time. When operating in a multiprogramming envi- 
ronment on the Model 15, either or all drives can be address- 
ed by both partitions, but the same file cannot be addressed 
by both partitions at the same time unless: 


®@ Both partitions are using it as input only. 


®@ One partition is using it as input and the other is using 
it as update. 


@ A file is being shared within the CCP partition. (See the 
IBM System/3 Communications Control Program Pro- 
grammer’s Reference Manual, GC21-7579.) 


The OCL FILE statement provides information about the 
files on a data module so that disk system management can 
read and write records for user programs. Files can reside 
on the main data area or in 5444 simulation areas. A FILE 
statement must be provided for each file used by your pro- 
grams. It must be contained within the set of OCL state- 
ments for each program using the 3340. Split cylinder files 
are not supported on the 3340. 


Figure 2-2 summarizes the keywords of the FILE statement. 
The following sections provide additional information about 
the keyword parameters. 


Keyword Parameters for Single Volume Disk Files 
NAME Parameter 


The NAME parameter is required for the FILE statement. 
It informs disk system management of the name that your 
program uses to refer to the file. The filename can be any 
combination of characters except commas, apostrophes, or 
blanks. The first character must be alphabetic. The number 
of characters must not exceed eight. 


PACK Parameter 


The PACK parameter is also required for the FILE state- 

ment, It informs disk system management of the name of 

the main data area or 5444 simulation area that contains or 
will contain the file. The management routines check this 
name to ensure that it is the same as the name in the volume 
label of the main data area or the 5444 simulation area being 
used. This parameter can consist of from one to six characters, 
excluding the apostrophe, comma, and blank. 







Page of GC21-5111-1 
{ssued 5 December 1975 
By TNL: GN21-5366 


Keyword Required 
Keyword Parameter or Optional 


RECORDS or Number Required for creat- 
TRACKS Number ing files 
rico 


LOCATION 
(main data area 


only) 
HIKEY (main Highest allowed Optional 
data area only) | key fields 
VERIFY (main | Code Optional 
data area only) 


Figure 2-2. Description of Parameters on the OCL FILE Statement 
for the 3340 
























Cylinder number/ 
track number 
(main data area 
only) 





Track number 
(5444 simulation 
area only) 






UNIT Parameter 


The UNIT parameter is the last of the required parameters 
in the FILE statement. It supplies the location of the main 
data area or 5444 simulation area that contains the file. 

The possible codes are F1, R1, F2, R2, D1, D2, D3, and D4. 


LABEL Parameter 


The LABEL parameter refers to the filename by which the 
file is identified in the VTOC. This parameter is required 
only if the filename in a program differs from the filename 
on the main data area or 5444 simulation area. If anew 
file is being created and the LABEL parameter is omitted, 
the filename from the NAME parameter is used. 
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DATE Parameter 


The DATE parameter is required when two or more files hav- 
ing the same name exist on a main data area or 5444 simula- 
tion area and a file with a particular date is desired. The 
creation date of the desired file is coded in the DATE param- 
eter. If two or more files with the same name exist on a 
main data area or 5444 simulation area and neither the date 
nor the location is given, the file having the latest creation 
date is selected. The date must be in the form month-day- 
year or day-month-year as was specified at system-genera- 
tion time. The date must be written as a six-digit number 
with three fields of two digits without punctuation, or three 
fields of one or two digits with the fields separated by 
Punctuation. Any characters except numbers, apostrophes, 
commas, or blanks can be used as punctuation. 


RETAIN Parameter 


The optional RETAIN parameter indicates the classification 
of the file when it is created. The classifications are: 
Code Meaning 
S Scratch file. A scratch file is intended for use 
only by the current program and does not exist 
after the completion of the current program. 
S is also used to remove a temporary file so that 


its space will be available to subsequent 
programs. 


T Temporary file. A temporary file is one that has 
short term usefulness and can be over-written 
when this usefulness has ended. 


P Permanent file. A permanent file is one that is 
expected to be maintained permanently on the 


data module. 


The file is assumed to be temporary if the RETAIN param- 
eter is omitted at file-creation time. 
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RECORDS or TRACKS Parameter 


Either the RECORDS or TRACKS parameter, but not both, 
can appear in the FILE statement. One of these is required 
for files being created and indicates the amount of space 
necessary for the file. If the file is being referenced, these 
parameters inform disk system management of the amount 
of space that was used for the file when it was created. The 
space requirement is specified as the number of records in 
the file (RECORDS) or as the number of tracks (TRACKS). 
When more than one file on the same main data area or 
5444 simulation area has the same filename, this keyword 
Parameter can be used to identify the desired file. Two 
restrictions are applicable when defining the space 
requirement: 


@ If RECORDS is used, the number can be up to six digits 
long and must be within the range of 1 through 999999. 


@ If TRACKS is used, the number can be up to four digits 
long and must be within the range of 1 through 3320 
when the file is in the main data area or 1 through 398 
when the file is in a simulation area. 


LOCATION Parameter 


For the main data area, the optional LOCATION parameter 
is used to specify the cylinder and track on which the file is 
to start; for a simulation area, this parameter is used to speci- 
fy the track on which the file is to start. You can specify 
either the cylinder number or the cylinder number and the 
track number for the main data area. If the track number is 
omitted, it is assumed to be zero. For the main data area, 
the cylinder number must be from 1 through 166 and the 
track number from 0 through 19. The cylinder number and 
track number, when specified together, must be separated 
by a slash (ccc/tt). For a simulation area, the track number 
must be from 8 through 405. 


When you are accessing an existing file, the LOCATION 
keyword parameter must be identical to that used in creat- 
ing the file. When you are creating a file, this parameter 
specifies the beginning position of the file. 


When two or more files on the same main data area or 5444 
simulation area have the same filename, this keyword param- 
eter can be used to identify the desired file. 


VERIFY Parameter 


The VERIFY parameter is used to specify verification of 
3340 write operations for this file in this step. If VERIFY- 
YES is specified, verification takes place. If VERIFY-NO is 
specified, write verification is bypassed. !f VERIFY is not 
specified, VERIFY-YES is assumed, unless RETAIN-S is 
coded, in which case VERIFY-NO is assumed. Verification 
is always done when a simulation area is accessed. 


Keyword Parameters for Multivolume Files 


For online multivolume files, the keyword parameters that 
require lists are PACK, UNIT, TRACKS, RECORDS, LO- 
CATION, and HIKEY. These parameters require lists to 
describe all of the data modules containing the file. For 
offline multivolume files, lists are also used, but UNIT does 
not require a list since all the volumes can be mounted on 
the same drive (D2, D3, or D4). 


Certain rules must be followed when indicating the lists for 
these parameters: 


© The lists must be enclosed in quotes. 

@ The items in the list must be separated by commas. 

@ The lists, except for HIKEY, must not contain blanks. 
The functions of the keyword parameters have been ex- 
plained (except for HIKEY which is explained here); there- 
fore, only the considerations for using the lists in these 
parameters are explained here. 

PACK Parameter 

The tist for this parameter contains the names of the vol- 
umes in the order they are to be used. 

UNIT Parameter 

If the number of units specified for this parameter is less 


than the number of volumes specified for the PACK. param- 
eter, the file is processed as an offline multivolume file. 


For online multivolume files, the unit codes must be speci- 
fied in the sequence that the volumes are used (specified by 
the PACK parameter). Up to four units can be specified (D1, 
D2, D3, and D4). 


For offline multivolume files, the sequence of unit codes is 
repeated until all volumes (specified by the PACK param- 
eter) are processed. For example: 


PACK-‘VOL1,VOL2,VOL3,VOL4,VOL5,VOL6’ 
UNIT-’D3,D4’ 


Volumes VOL1, VOL3, and VOL5 are mounted on unit 
D3 and volumes VOL2, VOL4, and VOL6 are mounted on 
unit D4. 


Unit D1 cannot be used for offline multivolume files. Unit 
D2 can be used for offline multivolume files when simula- 
tion of R2 and F2 is disabled (via a SIMULATE command). 


TRACKS or RECORDS Parameter 


The list for these parameters indicates the amount of space 
occupied by the multivolume file. The numbers in the list 
must correspond to the order of the names listed in the 
PACK parameter. 


LOCATION Parameter 


The list for this parameter contains the cylinder number or 
the cylinder number/track number parameter for the data 
modules you use for the file. The parameters must corre- 
spond to the order of the names in the PACK parameter. 

If LOCATION is specified for one volume of a multivolume 
file, it must be specified for all the volumes of that file. 


HIKEY Parameter 


The HIKEY parameter is used only for multivolume in- 
dexed files. HIKEY limits the highest key field that can be 
put on each data module of a multivolume file. For example, 
in the following HIKEY parameter, three volumes are used: 
HIKEY-‘JONES,NICOL,Z2Z2Z22'. The highest key field 
allowed on the first volumes is JONES. This means that all 
the records up to and including JONES will be on this vol- 
ume. Since HIKEY parameters must be in ascending order, 
the next volume contains all of the records with keys follow- 
ing JONES and including NICOL. The last volume contains 
all the records with names that come after NICOL and 
through ZZ22Z2Z. 
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Chapter 3. System Service Programs 


The Model 15 SCP (5704-SC1) includes a group of system 
service programs that are resident in a 5444 simulation area. 
These programs perform a variety of functions, from 
preparing data modules for use to reorganizing an indexed 
file to deleting files. The system service programs are 
described in /BM System/3 Model 15 System Control 
Programming Reference Manual, GC21-5077. 


The following system service Programs are available: 


Program Name 
Alternate track assignment SALT 
Alternate track rebuild $BUILD 
Copy/dump SCOPY 
Dump/restore $DCOPY 
File delete $DELET 
File compress $FCOMP 
System history area display $HIST 
Disk initialization SINIT 
File and volume fabel display $LABEL 
Library maintenance $MAINT 
Recover index $RINDX 
Reassign alternate track $RSALT 
3340 simulation area $SCOPY 
1000-file VTOC conversion $wVTOC 
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DISK INITIALIZATION PROGRAM (SINIT} 


All data modules used by programs processed under disk 
system management must be initialized. 


This system service program performs the following functions: 


® Analyzes the main data area and the 5444 simulation 
areas to determine if the data module is usable and 
whether it contains any defective tracks. 


@ Assigns alternate tracks for defective tracks when the 
data module is usable. 


@ Initializes a 1000-file VTOC for the main data area. 


® Copies IPL information from cylinder 0 on the system 
data module mounted on D1 to the data module being 
initialized. 


Note: The 5444 simulation and backup areas on a data 
module that have been initialized for the first time or 
initialized using TYPE-FORCE are unusable until the 
3340 simulation area program ($SCOPY) CLEAR function 
has been run to assign a volume labe! and build a 5444 
cylinder 0. 


The contro! statements required for the disk initialization 
program are shown in Figure 3-2. The numbered list 
corresponds to the numbered items in the figure. 


// LOAD $INIT, 


CYLO 


// RUN ’ RENAME |] 


YES 
NO 


ea 3 < PRIMARY > 
ruin uni. } Soe \ CLEAR | [,VERIFY-number}]  [, ERASE- 
‘codes’ 
_ FORCE 
4 G 


// VOL PACK-name[,ID-characters] [,OLDPACK-name] [,NAME360-name] 


//END 


Figure 3-2 (Part 1 of 3). Controt Statements Required for the Disk Initialization Program 
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Item Explanation 





The UNIT keyword parameter specifies the location of the data module you want to initialize. 
Any combination of a maximum of four data modules can be specified. 


The codes indicate the locations of the data modules: 


Code 


D1 
D2 
D3 
D4 


Meaning 


Data module on drive 1 
Data module on drive 2 
Data module on drive 3 
Data module on drive 4 


The TYPE keyword parameter specifies the type of initialization performed. The optional 
parameters are: 


@ PRIMARY: The data module will be initialized only if there are no active files on the data 
module. Only the main data area is initialized. 


CLEAR: The data module is initialized without checking for active files. Only the main data 
area is initialized. 


FORCE: Both the main data area and the simulation areas are initialized without checking 
for active files. (This is invalid for D1; and for D2 if F2 and R2 are being simulated.) 


CYLO: This is a fast initialization, which initializes only cylinder 0 on a previously 
initialized pack. 


RENAME: Only the areas of the pack affected by the PACK, ID, and NAME360 parameters 


are in 


itialized on a previously initialized pack. If either 1D or NAME360 is omitted, the 


default values are used for updating. The remainder of the pack is unchanged. 


1. 


For TYPE-CLEAR and TYPE-PRIMARY, the 5444 simulation and backup areas are 
initialized only if the module was not previously initialized on a System/3. Otherwise, 
TYPE-CLEAR and TYPE-PRIMARY initialize only the main data areas, but both the 
main data area and the simulation areas are checked for defective tracks and alternates 
are assigned if necessary. If the unit is D1, suspected defective tracks located in the 
5444 simulation areas are not tested. Instead, a halt is issued indicating that the data 
module should be moved to another drive and $ALT run against it. If the unit is D2, 
a halt is issued when either F2 or R2 is being used by the other partition. 


Individual 5444 simulation and backup areas are cleared with the 3340 simulation area 
program ($SCOPY). 





Figure 3-2 (Part 2 of 3). Control Statements Required for the Disk Initialization Program 
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Explanation 











One VOL statement must be supplied for each data module specified in the UNIT parameter 
of the UIN statement. 


The PACK keyword parameter entry on the VOL statement provides a data module name 
of up to six characters which is placed in the volume label. 


The optional 1D entry further identifies the data module. It is for your use as additional 
identification of the data module. The identification consists of up to 10 characters that, 


if specified, are placed in the volume label. If this parameter is omitted, it defaults to blanks. 


The OLDPACK parameter specifies the name of the data module to be initialized. 


The NAME360 parameter is an additional parameter that further identifies the data module. 
The parameter can be up to 44 characters long and, if specified, will be placed in the System/360 
format 1 DSCB. If this parameter is omitted, it defaults to SYSTEM/3 DATA. 


ERASE-YES, when used with TYPE-FORCE, flags and retests the tracks that are suspected 
as being defective, then flags them as usable if the retest results are satisfactory. 





Figure 3-3 (Part 3 of 3). Control Statements Required for the Disk Initialization Program 
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ALTERNATE TRACK ASSIGNMENT PROGRAM ($ALT) 


An alternate track is a substitute track selected to accept 
the contents of a defective track. Forty alternate tracks are 
available on the data modules for the 3340. An alternate 
track can be assigned to any track except cylinder 0, head 
0 by this program. Anytime a program attempts to use a 
track that has been assigned an alternate, the alternate will 
be automatically used instead. 


When programs encounter permanent reading or writing 
errors, the system automatically halts the current operation. 
You can then run the alternate track assignment program to 
test suspected defective tracks and assign alternates as need- 
ed. Some of the data might not be recovered when the alter- 
nate track assignment program is used. !f the data cannot 

be recovered without an error condition, the record or 
records are read under reduced hardware checking conditions 
and are written on the alternate track. The record or records 
that contain the error are printed in a form that completely 
identifies the data written on the alternate tracks. This 
printout should be retained. It is required for running the 
alternate track rebuild program. 


The control statements required for the alternate track 
assignment program are shown in Figure 3-3. The num- 
bered list corresponds to the numbered items in the figure. 


3-4.2 


ALTERNATE TRACK REBUILD PROGRAM ($BUILD) 


The alternate track rebuild program allows you to correct 
data that could not be transferred correctly to an alternate 
track. The information received from the alternate track 
assignment program gives the name of the data module and 
the number of the track and records suspected of contain- 
ing incorrect data and is used for writing control statements 
for this program. Up to 40 alternate tracks can be corrected 
during one program run. When correcting alternate tracks, 
be sure that the defective track has been assigned an alter- 
nate before modifying the data on that track. The program 
reads each set of statements and moves the corrected data 
into its proper location within a record. Remember, these 
corrections are actually made on an alternate track. 


The control statements required for this system service pro- 
gram to build alternate tracks are shown in Figure 3-4. The 
numbered list corresponds to the numbered items in the 
figure. 
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// LOAD $ALT, 


// RUN 


wi o1 
// ALT PACK-name,UNIT- D3 [,VERIFY-number] 


D4 


// END 


Item Explanation 
a, ee 


Bo An ALT statement is required for each data module processed during the current run. 


The PACK parameter identifies the data module containing the defective tracks. The name used is the 
name assigned by the disk initialization program. 


The UNIT parameter indicates the location of the data module containing the defective track. The possible 
codes are D1, D2, D3, and D4. The 5444 simulation areas (F1, R1, F2, R2) cannot be specified for the 
UNIT parameter. The 5444 simulation and backup areas are processed when D1, D2, D3, or D4 is 
Processed. When D1 is specified, halt UA31SD is issued and the data in the 5444 simulation area is not 
processed. When D2 is specified, halt UA F¥ is issued if either F2 or R2 is being used by the other partition. 


The VERIFY pararneter, an optional parameter, specifies the number of times surface analysis is to be 
performed on a suspected defective track. The number specified can be from 1 to 255. The default 
value is 16. If an error occurs, an alternate track is assigned. 





Figure 3-3. Contro! Statements Required for the Alxernate Track Assignment Program 
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F1 
R1 
// LOAD $BUILD, 


R2 


// RUN 


Oo B GB () g Go BoB 


// REBUILD PACK-name,UNIT- — , TRACK-location,_LENGTH-number,DISP-position,data statements 


D4 


// END 


Item Explanation 
SS eS 


ea The REBUILD statement specifies: 










@ The name and location of the data module being corrected 


© The original track and record address where the correction is to be made 






@ The location and number of characters to be replaced in the record 






This control statement is required for each record being changed and must be followed by one or more data 
statements. 






The PACK parameter indicates the name of the data module that contains the alternate track being modi- 
fied. This is the name assigned to the data module by the disk initialization program. 






The UNIT parameter indicates the drive on which the data module, specified by the PACK parameter, will 
be mounted. The possible codes are D1, D2, D3, or D4. The 5444 simulation area codes (F1, R1, F2, R2) 
cannot be specified for the UNIT parameter unless the PATCH statement is used. The 5444 simulation and 

backup areas are processed when D1, D2, D3, or D4 is processed. 












The TRACK parameter refers to the defective track and record that contain the data being corrected. Six 
characters refer to this location; the first four characters identify the track number, and the last two charac- 
ters identify the record number. 







The LENGTH parameter indicates the number of characters that must be modified in the specified record. 
The length specified must be in multiples of 2 and can range from 2 to 256, the maximum capacity of a 

record. The length applies to characters that occupy consecutive Positions in the record. !f the characters 
occupy nonconsecutive positions, either replace all intervening characters or use more than one REBUILD 
statement. 








The DISP parameter indicates the position in the record of the first byte of data being replaced. Starting at 
the position indicated, the program replaces the number of characters specified in the LENGTH parameter. 
The position of the first character is 1, the position of the second is 2; and so forth. The maximum DISP 
specification is 255. When the modified record uses a key, the key is considered part of the data area in 
calculating the displacement. 









The data statements contain the information to be placed on the specified record. Replacement characters 
are entered on the data statements in hex form. The records are updated, two bytes at a time, by the pairs 
of hex characters. Pairs of characters on the data statements must be separated by commas. When more 
than one statement is used, the last entry on all but the last data statement must be a comma. The first 
blank entry indicates the last entry for all data statements. 







Figure 3-4. Control Statements Required for the Alternate Track Rebuild Program 
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FILE AND VOLUME LABEL DISPLAY PROGRAM The contro! statements required for this system service pro- 
gram are shown in Figure 3-5. The numbered fist corre- 

The file and volume label display program is used to display sponds to the numbered items in the figure. 

any or all of the file labels on the main data area or any of 

the four 5444 simulation areas. This program performs the 

following functions: 


@ Displays the VTOC information for any specified file- 
name on a given main data area or 5444 simulation area. 


@ Displays the VTOC information for all files in the VTOC. 


@ Displays the status of the main data area or 5444 simula- 
tion area on any specified unit, including the number of 
available alternate tracks and size and location of availa- 
ble space in the specified area. 


// LOAD $LABEL, 


Bn 2 | VTOC 3 | 


// DISPLAY UNIT- ,LABEL- ¢ filename {, SORT-NAME] 
‘filename, ...’ 


Item Explanation 


ol The UNIT parameter specifies the area containing the volume information to be printed. 


The LABEL parameter indicates the information to be displayed from the specified area: 
Code Meaning 
VTOC All volume information is displayed. 
filename Only the VTOC information for the specified file is displayed. 


‘filename,...’ Only the VTOC information for the specified files is displayed. A maximum of 20 
files can be displayed for one program run. 


The SORT parameter can be specified only when LABEL-VTOC is specified. If SORT-NAME is specified, 
the volume information is sorted by filename into alphabetical order. This function applies only to 1000-file 
VTOCs and requires additional main storage for sorting. 





Figure 3-5. Control Statements Required for the File and Volume Label Display Program 
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For the main data area, this program requires a partition FILE DELETE PROGRAM 
size of 10K through 18K, depending on whether the SORT 


parameter is specified and the number of files in the VTOC. The file delete program frees space on data modules, mak- 
The number of VTOC entries and the storage required for ing space available for other files. This program frees space 
each are as follows: for a single file, multiple files, or for all files on a data 
module in the main data area or a 5444 simulation area by 
Number of Storage removing files from the System/3 VTOC. The contents of 
VTOC Entries Required the file are then unrecoverable. 
300 10K The control statements required for this program are shown 
500 12K in Figure 3-6. The numbered list corresponds to the num- 
700 14K bered items in the figure. 
900 16K 
1000 18K 


For a 5444 simulation area display, only 8K is required and 
the SORT parameter cannot be used. 


— es 












// LOAD SDELET, oe 
F2 
R2 
// RUN 
i 
i F1 
RI 
" F 
a | @ {vt0c i Fives 
// REMOVE PACK-name,UN!T- 54 ,LABEL- \ filename |, DATE-date] [,.DATA- | NO | | 
D2 filename, ... = 
D3 
D4 
Fi 
R1 
F2 
P R2 
// FORMAT UNIT- /PACK-name 





Figure 3-6 (Part 1 of 2). Control Statements Required for the File Delete Program 
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Item Explanation 


1 | The REMOVE statement removes the file entry from the VTOC and makes the space occupied by the file 
available. 









The PACK parameter indicates the name of the area that contains the file being deleted. For the main data 
area, this is the name assigned to the data module by the disk initialization program. For the 5444 simuta- 
tion areas, it is the name assigned by the 3340 simulation area program ($SCOPY). 







The UNIT parameter indicates the area, specified in the PACK parameter, containing the files to be deleted. 






The LABEL parameter identifies the file to be deleted. 










Code Meaning 










VTOC All files in the main data area or 5444 simulation area are to be deleted. 










filename 





Only the specified file is to be deleted. 








‘filename, ...’ 





Only the specified files are to be deleted. 






The DATE parameter identifies a particular file to be deleted when more than one file of the same name is 
specified on the LABEL parameter. If the DATE parameter is omitted and there are several files with the 
same name, all of the files are deleted. 







The DATA parameter indicates if the data is to be removed from a file. If the YES option is selected, the 
data is removed from the file. If the NO option is selected or if the parameter is omitted, the data is not 
removed from the file. 







DATA-YES should be used only if file security is required. The time needed to remove the data is much 
greater than the time needed to remove only the VTOC entry. 







The FORMAT statement is used to free all allocated space which does not contain files, libraries, or system 
areas, This statement is used when you suspect ihat a system failure or an inadvertent re-IPL might have 
left space allocated, but not actually being used, on the data module. The UNIT parameter indicates the 
area containing the allocated space to be freed. The PACK parameter indicates the name of the area contain- 
ing the allocated space to be freed. 








Figure 3-6 (Part 2 of 2). Control Statements Required for the File Delete Program 


COPY/DUMP PROGRAM 
Copypack 
The copy/dump program performs the following 3340 re- 


lated functions: copypack and copyfile. The copypack function: 


®@ Copies an entire main data area to another main data 
area. 


@ Copies an entire 5444 simulation area to another 5444 
simulation area. Copying an entire 5444 simulation or 
backup area to another 5444 simulation or backup area 
can be accomplished using the 3340 simulation area pro- 
gram ($SCOPY). 
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Copyfile 
The copyfile function: 


® Copies a file from a 5444 simulation area to another 
5444 simulation area. Indexed files cannot be copied. 


© Copies a file from a main data area to a 5444 simulation 
area. Indexed files cannot be copied. 


© Copies a file from a 5444 simulation area to a main data 
area. Indexed files must be copied consecutively using 
REORG-NO. A new index is built in the main data area. 


Note: Not specifying REORG causes $COPY to default 
to REORG-NO. 


© Copies a file from a main data area to another main data 
area. Sequential files can be copied consecutively and an 
index created, thus effectively copying a sequential file 
to an indexed file. 


® Copies a file to or from magnetic tape, cards, or diskette. 
Either sequential or indexed files can be created in the 
main data area; only sequential files can be copied to the 
5444 simulation area. 


® Prints all or part of a file whether it is being copied to 
another file or not. 


® Prints and/or copies selected records from a file based on 
either the relative record number or a key value. 


© Recovers a destroyed file by physical address. 
® Request direct output from sequential input. 


© Specify a different record length for the output file. 


Multivolume files are not supported for the 5444 simulation 
areas. Multivolume files can be processed one volume at a 
time {as single-volume files). 


The control statements for this system service program are 


shown in Figure 3-7. The numbered list corresponds to the 
numbered items in the figure. 
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/ LOAD $COPY, me 
F2 
a a 
// FILE NAME-COPYIN...... 
// FILE NAME-COPYO....... 
// FILE NAME-COPYP....... 
// RUN 
F1 Fi 
R1 R1 
F2 F2 
3 
3 as Ei Gg 
// COPYPACK FROM- D1 ,10- D1 {,PACKIN-packname] [,PACKO-packname] 
D2 D2 
D3 D3 
D4 D4 
g Be o 5 
OUTPUT PRINT DELETE ae eg 
- : REORG- ,LENGTH-number 
{| //COPYFILE yea ROTH L \ Mit \ Position,character’] [,REORG ae IT nu ] 
FILE 
15) - G 18) © 
im FROM- 52 ,CY LINDER-number,SECTOR-number,D!ISP-number, RECL-number 
// ACCESS Ge 
\n, 20} 
FROM. 4 es iCYLINDER-number, T RACK-number,SECTOR-number ,RECL-number 
9 | ( RECORD,FROM number, TO number! | 11) vee 
/! SELECT « KEY,FROM.‘key’[(,TO.’kev’] . [,FILE- ee \ ! 
2 lexy€ ROM-'key’[,TO-‘key’] \ 


// KEY LENGTH-number, LOCA TION-nuniber 


/OUTDM 
// END 
(oa 





DATAMGMT DIRECT 





ens Sse al 


Figure 3-7 (Part } at 3). Contral Siatumants ior the Copy /Uump Prograni 
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Item Explanation 


Gi These three FILE statements identify the input and output files. The FILE statement COPYIN is required 
for all COPYFILE jobs except access runs. The FILE statement COPYO is only required if the output option 
on the COPYFILE statement is DISK, FILE, or BOTH. The FILE statement COPYP is required only if 
printing on the 3284 printer. No FILE statements are required for a COPYPACK run. 





The COPYPACK statement indicates that the content of one area is to be transferred to another. The FROM 
parameter identifies the location of the area being copied. The TO parameter identifies the location of the 
area receiving the data. COPYPACK can only be used to copy from one 5444 simulation area to another or 
from one main data area to another. If the FROM location contains an active $SPOOL file, the location is 
copied, but the $SPOOL file is deleted before end-of-job. 


The optional PACKIN parameter identifies the area to be copied. This parameter is provided to check the 
area name to verify that the correct area is selected. 


The optional PACKO parameter identifies the output area. This parameter is provided to check the area name 
to verify that the correct area is selected. 


The COPYFILE statement indicates that one file is to be copied. Its parameters specify the type of copy 
performed. 


The OUTPUT and OUTPTX parameters indicate that the file is to be copied, printed, or both. When the data 
5 

files are being copied, the from and to files are specified as COPYIN and COPYO, respectively. If PRINT 

is selected, the OUTPTX parameter causes the output to be printed in hex values. 


The optional DELETE and OMIT parameters identify records for deletion from the file by giving the identi- 
fying character and its position in the record. Position {p) is the position of the character in the records. The 
Position specified must be fess than the record length. Character (c) is the character that identifies the 
records. The DELETE parameter cannot be used for direct files. If the DELETE parameter is used, the 
deleted records are printed. If the OMIT parameter is used, the deleted records are not printed. If neither 
parameter is used, all of the records in the input file are copied. 





G The optional REORG parameter permits reorganization uf the file as it is being copied. The YES opcior: 
applies oniy to indexed files. If the YES option is specified, the output file is reorganized putting the records 
in ascending order by their key fields. tf the NO option is specified or if the entry is sot included, either the 
file is not an indexed file or the records in the output file have the same sequence as tn the input file. in 
either case, the input file is not affected. 


g The optional! SELECT statement allows selected recards to be printed and/or copied to an output file. !f the 
SELECT statement is not specified anu the QUTPUT parameter on the COPYFILE statement is PRINT or 
BOTH, all the records are selecied. 
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im The RECORD parameters use relative vecord nubers to dently ae cacords to ve selected. Reiatwe record 
numbers identify a record’s tocaiion in th suectis other eearcs inthe file. The FROM pararecs 
specifies the first record to be selected. The TO parametc: indicates the last -scurd to be selected. The 
program assumes that the number of the last recorei is: the file is the TO number it the TO oarameter 1s 
omitted. 


The KEY and PKY parameters apply io selecting part of an indexed file. The FROM parameter gives the key 
of the first record to be selected. The TO parameter gives the key of the last record to be selected. The pro- 
gram assumes that the last key in the index is the TO key if the TO parameter is omitted. The records 
selected are those which have keys between or equal to the FROM and TO limits. The PKY Parameter 
applies to an indexed file containing packed keys. 
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The optional FILE parameter allows only selected records to be copied. If FILE-YES is specified, 
selected records are copied to the file named in the COPYO FILE statement. If FILE-NO is 
specified, OUTPUT-BOTH or OUTPUT-PRINT must be specified. If OUTPUT-BOTH is specified, 
selected records are printed and the entire file is copied to the file named in the COPYO FILE 
Statement. [f QUTPUT-PRINT is specified, selected records are printed only. 


The optional KEY statement is used to create an indexed file from a sequential file. LENGTH and 
LOCATION specify the key length and start location of the key in the record. 


The optional LENGTH parameter specifies the length of the output records. If LENGTH Parameter 
is not used, the output record length will be the same as the input record length. 


The ACCESS statement indicates that data on a disk pack wnign has no VTOC entry is to be copied 
and the location of this data is specified by physical address.! 


The FROM parameter indicates the drive on which the data is located. 


The CYLINDER parameter indicates the starting cylinder number of the data. For simulation 
areas, this number may be 0-202. Fer main data areas, the cylinder number may be 0-167. 


The SECTOR parameter indicates the starting sector number of the data. For simulation areas, 
this number may be 0-47. For the main data areas, the sector number may be 1-48. 


The DISP parameter indicates the displacement into the sector of the first record to be copied 
(recovered). It may be a number between 0-255. 


The RECL parameter indicates the tength of the data records in bytes. 


The TRACK parameter indicates the starting track number of the data. It is used only with 
recovery from main data areas and may be 0-19. 


The OUTDM statement indicates that direct output is requested from sequential input. 


t Select record with FILE-YES must be used with all access runs. 
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DUMP/RESTORE PROGRAM ($DCOPY) 


The $DCOPY program is used to dump or restore a 3340 data 
module to or from magnetic tape or diskette for backup. 


If BACKUP-3741 is specified in the control statement, 

the simulation area or the IPL records and a simulation area 
are dumped or restored from the 3741. If no BACKUP 
parameter is specified, the backup is to tape. Backup to 
3741 takes approximately 11 full diskettes. When operating 
the 3741, specify a record length of 128. 


If the program is loaded and executed, it will perform one 
of the following: 


@ Copy the main data area of a 3340 data module onto 
magnetic tape. (Note that if the area to be copied 
contains an active $SPOOL file, the area is copied, 
but the $SPOOL file is deleted before end-of-job. } 


e Copy a 5444 simulation area of a 3340 data module onto 
magnetic tape or diskette 


@ Copy the 3340 IPL area and its associated 5444 
simulation area of a 3340 data module onto magnetic 
tape or diskette 


@ Restore the main data area of a 3340 data module from 
magnetic tape 


e@ Restore a 5444 simulation area of a 3340 data module 
from magnetic tape or diskette 


@ Restore the 3340 IPL area and its associated 5444 
simulation area of a 3340 data module from magnetic 
tape or diskette 


The control statements and parameters required for this 
system service program to function are shown in Figure 3-8. 
The numbered list corresponds to the numbered items in 
the figure. 
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// LOAD $DCOPY, 


Ti 


T3 nnnnnn 


// FILE NAME-BACKUP,UNIT- 2 /REEL | Ne 


T4 


FI 
R1 


F2 3 | 


// COPYPACK eee R2 \ | PACK-name] [, SYSTEM - | 1 L.BACKUP- {cere} 


NO 3741 


This FILE statement identifies the tape file used as a backup copy. The FILE statement is not 
necessary if BACKUP-3741 is specified. (For a more detailed description of the file, see the 
IBM System/3 Model 15 System Control Programming Reference Manual, GC21-5077.) 


The COPYPACK statement indicates that the information from one main data area, or the 3340 IPL area, 
and/or the 5444 simuiation area is to be transferred to tape or that the content of one main data area, or the 
3340 IPL area, and/or the 5444 simulation area is to be restored from tape. The FROM parameter indicates 
the location of the area being copied. The TO parameter indicates the location of the area receiving the copy. 
The PACK parameter indicates the name of the area being used. 


The SYSTEM parameter indicates whether or not the 3340 IPL area associated with the 5444 simulation area 
should be copied to or from magnetic tape. This parameter is used when restoring distribution tapes from the 
Program library. When SYSTEN-YES is specified, the 3340 IPL area and its associated 5444 simulation area 

is copied to or from magnetic tape. When SYSTEM-NO is specified, the program proceeds as if the parameter 
was not included in the control statement. If SYSTEM-YES is specified, the valid codes that may be used with 


the TO and FROM parameters are R1, F1, R2, or F2. If no SYSTEM parameter is specified, the default is 
SYSTEM-NO. 





Figure 3-8. Control Statements Required for the Dump/Restore Program 
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3340 SIMULATION AREA PROGRAM ($SCOPY) 


The 3340 simulation area program has the following six 
functions: 


COPYAREA: Copies the entire contents of one 5444 
simulation or backup area to another 5444 simulation 
or backup area. 


CLEAR: Clears all the data from a 5444 simulation or 
backup area and builds a simulated cylinder 0 (optionally 
gives volume 1D and owner ID). 


NEWNAME: Changes the name (volume !D) of a 5444 
simulation or backup area. 


NAMES: Prints/displays the name (volume ID) of each 
available 5444 simulation area, 5444 backup area, and 
main data area. 


MOVE: Copies the entire contents of one 5444 simula- 
tion or backup area to another 5444 simulation or back- 
up area, clears the area from which the contents were 
copied, and builds a simulated 5444 cylinder 0 in the 
area copied from. 
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COPYIPL: Copies IPL records from one 3340 data 
module to another 3340 data module. 


The use of any of these functions requires that the 5444 
area referenced be dedicated to the partition executing 
$SCOPY, except for the FROM area in the COPYAREA 
function and the NAMES function. The data module, on 
which the 5444 area is being referenced, cannot be dedi- 
cated to the other partition. 


Four contiguous areas of 10 cylinders each (starting at 
cylinder 169) are reserved on each of the four 3340 drives 
to simulate 5444 drives. Each simulated 5444 requires 10 
cylinders; therefore, on a system with four 3340 drives, 
there are sixteen 5444 simulated areas. The first two areas 
on D1 are reserved for F1 and R1; the first two areas on 
D2 are reserved for F2 and R2. These four areas are accessi- 
ble via normal data management (except multivolume and 
indexed files) and 5444 system service programs (except 
$INIT or SALT). $SCOPY provides access to these and 
the other 12 possible areas for maintenance purposes. 


The 5444 simulation areas are designated as follows: 


Start End 
Area (CCC/HH/RR);} (CCC/HH/RR) 


A — First 5444 simula- |169/00/01 178/19/48 
tion or backup 
area 







f 






























Second 5444 179/00/01 188/19/48 
simulation or 


backup area 














Third backup area | 189/00/01 198/19/48 








Fourth backup area] 199/00/01 208/19/48 
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The following diagram shows the location of data modules 


and backup areas on the 3340. 


Drive 1 


Drive 2 


Drive 3 
(if sup- 
ported) 


Drive 4 
(if sup- 
ported) 








Cyl 0 Cyt 1-166 
System | Main data 
area area D1 





Cy! 0 Cyl 1-166 


System | Main data 
area area D2 





Cy! 0 Cyl 1-166 


System | Main data 
area area D3 





CylO —- Cy: 1-166 


System | Main data 
area area D4 














Cy! 167-168 


Alternate 
tracks 


Cyi 167-168 


Alternate 
tracks 


Cyl 167-168 


Alternate 
tracks 


Cy! 167-168 


Alternate 
tracks 





Cy! 169-178 


Simulation 
area A 


Cyl 169-178 


Simulation 
areaA 


D2A F2 area 
if simulation 


is on 


Cyl 169-178 
Simulation 
area A 

D3A 


Cy! 169-178 


Simulation 
area A 


D4A 


The control statements required for this system service 
Program are shown in Figure 3-9. The numbered list corre- 
sponds to the numbered items in the figure. 
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D1A F1 area 





Cyl 179-188 
Simulation 
area B 

D1B R11 area 


Cyl 179-188 


Simulation 
area B 


D2B R2 area 


if simulation 
ison 


Cyl 179-188 
Simulation 
area B 

D3B 

Cyi 179-188 
Simulation 


area B 
048 





Cyl 189-198 


Simulation 
area C 
D1C 


Cy! 189-198 
Simulation 


area C 
D2C 


Cy! 189-198 


Simulation 
area C 
D3Cc 


Cyl 189-198 


Simulation 
area C 
D4c 





Cy! 199-208 


Simulation 
area D 
D1D 


Cyl 199-208 


Simulation 


area D 
D2D 


Cyl 199-208 


Simulation 
area D 
D3D 


Cy! 199-208 


Simulation 
area D 
D4D 


Cyl 209 heads 1-, 











Error logging 
and CE tracks 


Cyl 209 heads 1-7 







Reserved 


Cyl 209 heads 1-7 


Reserved 


Cyl 209 heads 1-7 


Reserved 


// LOAD $SCOPY, 


// COPYAREA FROM- ,TO- /,PACK-name,AREA-name[, TONAME-name] 


YES 
[,SYSTEM- tne | 


D1 
// CLEAR FROM- : 


/PACK-name[,AREA-name] [,CLRNAME-name] [,1D-name] [,TYPE- 


CHECK 1 
D3 


FORCE 
D4 


D2 
D3 
D4 
PRINT 
// NAMES DISPLAY 
BOTH 


// NEWNAME TO- /PACK-name,AREA-name, TONAME-name 


| 
HH (-' | a 15) 16 


mH D1 A 
D2 B 
// MOVE FROM- D3 C 
D4 D 

|, SYSTEM- | ce ] [,CLRNAME-name] 


20) 21 22 23 


/PACK-name,AREA-name[, TONAME-name] [,1D-name] 


EB D2 wy 
// COPYIPL FROM- To- }p3 $ PACK-name 
D4 


// END 


Item Explanation 


Hi The FROM parameter identifies the data module and the simulation or backup area being copied. 
Code Meaning Code Meaning 


D1 3340 unit D1 First simulation or backup area 
D2 3340 unit D2 Second simulation or backup area 
D3 3340 unit D3 Third simulation or backup area 
D4 3340 unit D4 Fourth simulation or backup area 


D1A is the area code for F1. 
D1B is the area code for R1. 
D2A is the area code for F2 if simulation is on (via a SIMULATE command). 
D2B is the area code for R2 if simulation is on (via a SIMULATE command). 
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Explanation 





The TO parameter identifies the data module and the simulation or backup area receiving the copy (see 
item 1 for an explanation of the codes). 


The PACK parameter identifies the name of the data module containing the simulation or backup area 
receiving the copy. This is the name assigned by the disk initialization program ($INIT}. 


The AREA parameter identifies the name of the simulation or backup area being copied. 


The TONAME parameter (up to six characters) is used to change the name of the simulation or backup 
area receiving the copy. If the TONAME parameter is omitted, the name of the simulation or backup 
area being copied is used. 


The SYSTEM parameter is used to copy IPL information. If SYSTEM-YES is specified, the IPL informa- 
tion from cylinder 0 of the system data module on drive 1 is copied to cylinder O of the data module 
receiving the copy. !f SYSTEM-NO is specified, the IPL information is not copied. !f no parameter is 
specified, SYSTEM-NO is assumed. 


The FROM parameter identifies the data module and the simulation or backup area being cleared (see 
item 1 for an explanation of the codes). 


The PACK parameter specifies the name of the data module containing the simulation or backup area be- 
ing cleared. This is the name assigned by the disk initialization program (SINIT). 


The AREA parameter specifies the name of the simulation or backup area being cleared. This parameter 
cannot be specified if the area has no assigned name. The AREA parameter must be specified as PID001 
in order to clear an area used for distribution of programs from the 1BM program library/PID. 


The CLRNAME parameter (up to six characters) specifies the name to be given to the area being cleared. 
If no parameter is specified, the name of the area is the name previously defined. If no name has been 
previously defined, CLRNAME must be specified. The name can be any combination of standard 
System/3 characters except apostrophes, blanks, and commas (due to their delimiter function). (See 
Appendix E for a list of standard System/3 characters.) Its length must not exceed six characters. The 
following are valid area names: 0, FOO01, 012, A1B9, ABC. 


The ID parameter enables you to include a maximum of 10 characters, in addition to the area name, to 
further identify a disk. The characters can be any combination of standard System/3 characters (see 
Appendix E) except apostrophes, blanks, and commas (due to their delimiter function). The information 
is strictly for pack identification. (it is not used by the system for checking purposes.) If no parameter is 
specified, the owner 1D area in the volume label is blank. 

The TYPE parameter specifies the type of clear to be done. The optional parameters are: 


@ CHECK: Check for active tiles or libraries and halt if any are found. 


@ FORCE: Clear the area without checking for vctive files or libraries. (All libraries and data files are 
deleted.) 


If no parameter is specified, the TYPE-CHECK is assumed. 
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Explanation 


The TO parameter identifies the data module and the simulation or backup area being renamed (see item 1 
for an explanation of the codes). 


The PACK parameter specifies the name of the data module containing the simulation or backup area being 
renamed. This is the name assigned by the disk initialization program (SINIT). 


The AREA parameter specifies the existing name of the simulation or backup area being renamed. 


The TONAME parameter (up to six characters) specifies the new name being given to the simulation or 
backup area. (See item 10 for explanation of valid names.) 


The PRINT parameter indicates that all online simulation or backup area names are to be printed on the 
device assigned as the system print device (// PRINTER). The DISPLAY parameter indicates that all online 
simulation or backup area names are to be displayed on the display screen. The BOTH parameter indicates 
that all online simulation or backup area names are to be printed and displayed. !f no parameter is specified, 
the simulation or backup area names are printed. If an area is unavailable or in use by the other partition, 

its volume ID will be left blank and an exception line will be built giving the reason. During a display, a 
second screen will be provided for this exception output. 


The FROM parameter identifies the data modules and the simulation or backup area being moved (see item 
1 for an explanation of the codes). 


The TO parameter identifies the data module and the simulation or backup area receiving moved informa- 
tion (see item 1 for an explanation of the codes). 


The PACK parameter identifies the name (assigned by $INIT) of the data module containing the simulation 
or backup area receiving the moved information. 


The AREA parameter specifies the name of the simulation or backup area being moved. 
The TONAME parameter (up to six characters) is used to change the name of the simulation or backup area 
receiving the moved information. If no parameter is specified, the name of the simulation or backup area 


being moved is used. (See item 10 for explanation of valid names.) 


The ID parameter (up to 10 characters) specifies the owner |D that will be given to the area from which 
information was moved. !f no parameter is specified, the owner ID in the volume label is left blank. 


Note: Usinga COPYAREA or MOVE, the receiving area is assigned the owner ID of the area being copied 
from. (See item 11 for explanation of valid names.) 


The SYSTEM parameter is used to move IPL information. If SYSTEM-YES is specified, the IPL informa- 
tion from cylinder 0 of the system data module on drive 1 is moved to cylinder O of the data module receiv- 
ing the moved information. If SYSTEM-NO is specified, the IPL information is not moved. If no parameter 
is specified, SYSTEM-NO is assumed. 

The CLRNAME parameter (up to six characters) is used to assign a name to the area from which the infor- 
mation has been moved. If no parameter is specified, the area is cleared and the name previously assigned 

is used. (See item 10 for explanation of valid names.) 

The FROM parameter identifies the data module containing the IPL records to be copied. 


The TO parameter identifies the data module receiving the IPL records. 


The PACK parameter identifies the name (assigned by S$INIT) of the data module receiving the IPL records. 
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The following are examples of control statements used to 
perform specific functions of the 3340 simulation area 
program. 


// CLEAR FROM-D3C,PACK-D3D3D3, 
CLRNAME-D3CD3C,1D-BACKUPF1 


Explanation: After a check for active files and libraries 
(default is TYPE-CHECK), the third backup area on drive 
D3 is cleared. It is given a volume 1D of D3CD3C and an 
owner ID of BACKUPF1. This is an example of the CLEAR 


that is to be run after the entire data module has been initial- 


ized by SINIT. 


// CLEAR FROM-D1C,PACK-D1D1D1, 
AREA-PID001,CLRNAME-D1CD1C,TYPE-FORCE 


Explanation: After verification that the volume ID on the 
third area of drive D1 is PIDOO1, the area is cleared and 
given a volume 1D of DICD1C. The owner ID is all blanks 
and the check for active files and libraries is bypassed. This 
is an example of the control statement needed to clear an 
area containing programs from the IBM program library/ 
PID. 


// COPYAREA FROM-D1A,AREA-F1F1F1,TO-D4C, 
PACK-D4D4D4 


Explanation: After verification that the volume !D of area 
D1A is F1F1F1, the area (D1A) is copied to the third back- 
up area on drive D4. The entire simulation area is copied 
including cylinder 0, the volume 1D, and the owner ID if it 
was present on D1A. 


// MOVE FROM-D1B,AREA-R1R1R1,TO-D4D, 
PACK-D4D4D4,TONAME-BKUPR1 


Explanation: The entire R1 simulation area on drive D1 is 
copied to the fourth backup area on drive D4, and the D4D 
area is given a volume ID of BKUPR1 and an owner ID of 
the R1 area if one exists. After the copy is complete, the 
R1 simulation area is cleared of all data, its owner ID field 
is blank, and it retains its volume ID of R1R1R1. The R1 
simulation area is now ready to be the receiving area of a 
COPYAREA or another MOVE. 


// COPYIPL FROM-D2,TO-D3,PACK-D3D3D3 


Explanation: The IPL (initial program load) records and 
the 3340 micro code are copied from cylinder 0 of the data 
module on drvie D2 to cylinder 0 of the data module on 
drive D3. A check Is made before the copy to ensure that 
the volume ID of the data module on drive D3 is D3D3D3. 


// NAMES BOTH 


Explanation: This control statement enables you to print 
on the system print device the volume [ID and ID of all on- 
line and available 3340 data modules and 5444 simulation 
and backup areas. Ali simulation and backup areas on a 
data module are considered by the 3340 simulation area 
program as unavailable if the data module is dedicated to 
the other partition, if the other partition has a roll-in pend- 
ing, or if the data module has not been initialized by 
System/3 SINIT. This control statement also prints an 
exception line, if needed, giving the reason for any unavaila- 
ble 5444 simulation or backup areas. 


This statement displays the volume !{D of ail online and 
available 3340 data modules and 5444 simulation and back- 
up areas on the 3277 display station (see Figure 3-10). It 
also displays an exception screen, if needed and requested 
by the operator, giving the reason for any unavailable 5444 
simulation or backup areas (see Figures 3-11 and 3-12). 


// NEWNAME TO-D4B,AREA-R1R1R1, 
PACK-D4D4D4,TONAME-BACKUP 


Explanation: After verifying that the name (volume ID) of 
the 3340 data module on D4 is D4D4D4 and that the name 
(volume ID) of the second backup area on D4 is R1R1R1, 
the name (volume ID) of the backup area is changed from 
R1R1R1 to BACKUP. 
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LINE 
C 3340 AREA NAMES $SCOPY a 
Bam /ppd/yy EMqH.mM.ss 
C3 Geack GHA B C D 3 
DL DLDIDL = FLFLFL RIRURL PIDOOL PIDOOL 4 
D2 D2D2D2 F2F2F2 R2R2R2 BACKUP D2DD2D 5 
D3 D3D3D3 D3AD3A D3BD3B D3CD3C D3DD3D 6 
D4 D4D4D4 D4AD4A D4BD4B D4CD4C D4DD4D 7 

8 





Item Explanation 


Operator response 

C — Cancel display and return to read the next control statement. 

F — Page forward to next display. 

B — Page backward to previous display. 

The first display screen will have a C in this position if there is no subsequent display. It will have an F in 
this position to indicate that a subsequent display containing exception information is available. The last 
exception output page will have a C in this position. 

The system date. 

The system time (if the time-of-day option is supported). 

The unit code of the 3340. 


The volume !D of the 3340 data module. 


The volume ID of the 5444 simulation or backup area. 


Note: The lines for D3 and D4 appear only if the system supports D3 and D4. 


Figure 3-10. Example of Output from a // NAMES Display 
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DD g9a8 8a 


ENF 3340 AREA NAMES $SCOPY 
MM/DD/YY HH.MM.SS 
BbPack PBwa B Cc Fi p 

DL DIDIDL =6FLFIFLD 6 OQ go DLDD1D 
D2 NOT ON LINE 
D3 NOT INITIALIZED 


D4 IN USE BY P2 





Item Explanation 
| ——_———SSSSSsSSMS909Ma93S@$SaSS a 


Drive D1 was available; therefore, the volume ID is displayed. 
5444 simulation area D1A (F1) was available; therefore, its volume ID is displayed. 


5444 simulation area D1B (R1) was in use by the other partition or had no volume ID; therefore, its 
volume ID is not displayed. 


5444 backup area D1C was in use by the other partition or it had no volume ID; therefore, its volume 
ID is not displayed. 


5444 backup area D1D was available; therefore, its volume ID is displayed. 


3340 unit D2 is not ready; therefore; its volume ID and the volume IDs of the 5444 simulation and 
backup areas are not displayed. 


The 3340 data module on unit D3 is not properly initialized; therefore, its volume ID and the volume 
IDs of the 5444 backup areas are not displayed. 


The 3340 data module on unit D4 is in use by the other partition; therefore, its volume |D and the 
volume IDs of the 5444 backup areas are not displayed. 


The F (forward code) appears indicating that a subsequent display containing exception information 
is available. 





Figure 3-11. Example of // NAMES Display with Exception Output 
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Ec 3340 

ERIN USE BY pP2 
EBNO VOL LABEL 
ZR UNAVAILABLE 


EXCEPTION AREAS 


$SCOPY 
DiB 
Dic 
D2A, 
D3B, 
D4C, 


D2By 
D3C, 
D4D 


D2Cy 
D3D; 


D2d;, 
D4A, 


D3Ay 
D4B, 


Item Explanation 


The C (cancel code) appears indicating that this is the last display page. 


5444 simulation area D1B (R71) is in use by the other partition. 
5444 backup area D1C did not have a valid volume label. 


The designated 5444 simulation and backup areas were not available to $SCOPY. 





Figure 3-12. Example of Exception Output with // NAMES Display Statement 
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SYSTEM HISTORY AREA DISPLAY PROGRAM 


The system history area display program allows you to print 
the contents of the SHA (system history area). The SHA 

is aspecial area on the system pack that contains the 
following information: 


® OCL statements read by the system 
® OCL diagnostics issued 


® Control statements for the system service programs 
read by the system 


® OCC entered by the operator 


F 
R1 
// LOAD SHIST, 


R2 


// RUN 


: CURRENT 
// PRINT HISTORY- DL | 
//END 
Item Explanation 


®@ OCC diagnostics issued 
® System messages issued 


® Operator responses to system messages 


CRT display written to the history area by the operator 


The control statements required for this system service 
program are shown in Figure 3-13. The numbered list 
corresponds to the numbered items in the figure. 


El The HISTORY parameter allows you to obtain a printed copy of the SHA. If HISTORY-ALL is specified, 


the entire SHA is printed. If HISTORY-CURRENT is specified or the PRINT statement is not specified, 


only SHA entries not previously printed are listed. 





Figure 3-13. Control Statements Required for the System History Area Display Program 


3-22 


LIBRARY MAINTENANCE PROGRAM 

The library maintenance program has five functions: 

allocate, copy, delete, modify, and rename. 

Allocate 

The allocate function: 

® Creates (reserves space for) libraries, SWA (scheduler 
work area), SHA (system history area), and rollout/rollin 
area 

@ Changes the sizes of libraries and SHA 

®@ Deletes libraries 


@ Reorganizes libraries 


Note: Remember that libraries cannot exist in the main 
data area; only R1, F1, R2, and F2 can contain libraries 


that may be referenced by the library maintenance program. 


The control statements required for the allocate function 
are shown in Figure 3-14. The numbered list corresponds 
to the numbered items in the figure. 


// LOAD $MAINT, 


source. | "9"|) LoBJecr. 


// ALLOCATE TO- 


YES 
LSYSTEM- i 


Copy 

The copy function: 

@ Copies or replaces library entries from reader to library 
®@ Copies or replaces library entries from file to library 

@ Copies entries from library to file 

© Copies entries from library to library 

@ Prints entries from library 

@ Punches entries from library 

@ Prints and punches entries from library 


@ Prints entries from a directory 


] LHISTORY-nnn] [,DIRS!ZE-nnn] [,WORK- 





Figure 3-14 (Part 1 of 2). Control Statements Required for the Allocate Function of the Library Maintenance Program 
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Explanation 





The TO parameter indicates the location of the 5444 simulation area that contains, or will contain, the library. 
If the program use involves both libraries, the libraries must be in the same 5444 simulation area. The TO 
parameter cannot be the same 5444 simulation area from which the library maintenance program or system 
is loaded. 






2 | The SOURCE and OBJECT parameters identify the library and function to perform. You can specify 
either or both parameters. 






Parameter Meaning 





SOURCE-nnn If the 5444 simulation area contains no library, the parameter means create a library. 
OBJECT-nnn The nnn is the number of tracks you want to assign to the library. 















If the 5444 simulation area contains a library, the parameter means change the 
library size. The nnn is the number of tracks you want to assign to the library. 






SOURCE-O Delete the library. 
OBJECT-0 






SOURCE-R Reorganize the library. 
OBJECT-R 





EI The optional SYSTEM parameter allows you to create a system pack. If SYSTEM-YES is specified, a 
scheduler work area (SWA) and a system history area (SHA) are created to make the 5444 simulation 
area a system pack. If SYSTEM-NO is specified or the parameter is omitted, these areas are not created 
and the 5444 simulation area is not a system pack. 







gg The optional HISTORY parameter allows you to assign the number of tracks for the system history area. 
The minimurn size is two tracks; the maximum is the number of tracks in the available area. If this 
parameter is not specified, the SHA is assigned two tracks. 







GB The optional DIRSIZE parameter allows you to specify the size of the object library directory. Up to 
nine tracks can be specified. If the DIRSIZE parameter is omitted, the SYSTEM parameter is used to 
determine the directory size. If SYSTEM-YES is coded, three tracks are assigned to the directory. If 
SYSTEM-NO is specified or the SYSTEM parameter is omitted, one track is assigned to the directory. 








G The optional WORK parameter indicates the location of the 5444 simulation area or main data area that 
contains a work area. Library entries are temporarily stored in the work area while the program moves 
and reorganizes libraries. The WORK parameter is not required for a compress in place. 






Figure 3-14 (Part 2 of 2), Control Statements Required for the Allocate Function of the Library Maintenance Program 
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The control statements required for the copy function are 


shown in Figure 3-15. The numbered list corresponds to the 
numbered items in the fiqure. 


Fi 
R1 
F2 
R2 


// LOAD $MAINT, 


// FILE (OCL statement required for library-to-file or file-to-library) 


// RUN 


Reader-to-library: 


a B -)| @ g (7 G@ (rt 
// COPY FROM-READER,LIBRARY- 0 iNAME-xxxxxx,TO- 59 [,RETAIN- ¢ P ] 
R 
R R2 


library entry 


// CEND 


File-to-library: 


Oo O/°') @ Gi 


R1 i 80 

// COPY FROM-DISK,TO- /FILE-x ...x, [RETAIN- P ] {,RECL- ] 
F2 R 96 
R2 


// COPY LIBRARY- i/NAME-xxxxxx in the file 


wmDonvuvuM|n 


library entry in the file 
//CEND | in the file 


Library-to-file: 


o /') @ G8 


0 
// COPY FROM- ,1O-DISK,FILE-x ... x[,RECL- ba ] 


F2 96 
R2 
S 
9 | 2 P 3 | XXXXXX 
// ENTRY LIBRARY- O iNAME- ¢ cecec.ALL 
R ALL 
ALL 


//NEND 


Figure 3-15 (Part 1 of 4). Control Statements Required for the Copy Function of the Library Maintenance Program 
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Library-to-library: 













S 
cs Fl B 3 | XXXXXX gO Fi Gg 
R1 eecece.ALL Ri z 
// COPY FROM- 59 ,LIBRARY-< O »NAME- AEE ,TO- FO [,RETAIN- ¢ P ] 
R R 
R2 
ALL SYSTEM R2 






L, NEWNAME- J 


XXXXXX 
CCCCC 








Library-to-printer-and/or card: 
le eee 







S 
Fi P XXXXXX 
1 B 3 | ga PUNCH 
R1 O ececc. ALL oe 
// COPY FROM- ,LIBRARY- /NAME- /10- PRINT 
ie a SEE PRTPCH 
R2 ALL DIR 
SYSTEM 






XXXXXX 
IT- 
LOMIT | eecec. ALL | 






// END 


{tem Explanation 
2 eee ee 


a The FROM parameter indicates the location of the library entries to be copied, printed, or punched. 








Code 






Meaning 





Fi, R1, F2,R2 Location of library containing the entries 








READER 





Entry is to be read from the system input device 










DISK 





Entry resides in a data file in a main data area or 5444 simulation area. The file 
must be described by a FILE statement. 





| 2 | The LIBRARY parameter indicates the type of entries in the copy function. 





Code Meaning 







S Source statements (source library) 





P OCL procedures (source library) 





0 Object programs (object library) 








R 





Routines (object library) 








ALL 





All types of entries (S, P, O, R) 





SYSTEM Only system directory entries 






Figure 3-15 (Part 2 of 4). Control Statements Required for the Copy Function of the Library Maintenance Program 
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Item Explanation 
en 


Ei The NAME parameter identifies the entries involved in the copy function. 
Code Meaning 
XXXXXX Name of library entry. 


ecece.ALL Only those entries beginning with the indicated characters of the type indicated in the 
LIBRARY parameter. You can use up to five characters. 


ALL All entries of the type indicated in the LIBRARY parameter. 


SYSTEM System programs that make up the minimum system and IPL information contained on the 
5444 simulation area cylinder O are copied. 


Directory entries for all library entries of the type indicated in the LIBRARY parameter 
are involved in copy use. If LIBRARY-ALL is specified, system directory entries are 


also printed. 


gO The TO parameter indicates the location of the library to contain the copies of the entries or whether the 
entries are to be printed, punched, both, or copied to a file. 


Code Meaning 


F1, R1, Location of library to contain copies. 
F2, R2 


PRINT Entries are printed. 
PUNCH Entries are punched. 
PRTPCH _ Entries are printed and punched. 


DISK Entries are copied to a data file in a main data area or 5444 simulation area. The file must 
be described by a FILE statement. 


GB The optional RETAIN parameter indicates the designation of the TO entry. 


Code Meaning 

T Temporary. If replacing an entry, halt before replacing entry. 
Permanent. If replacing an entry, halt before replacing entry. 

R Permanent. If replacing an entry, do not halt before replacing entry. 


If RETAIN is not specified, T is assumed except when copying library-to-library where LIBRARY-ALL, 
NAME-ALL or LIBRARY-O, NAME-SYSTEM are specified. In these cases, P is assumed. 





Figure 3-15 (Part 3 of 4). Control Statements Required for the Copy Function of the Library Maintenance Program 
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Item Explanation 
Ol Freee 


Gg Library entry being replaced or added. The // CEND statement must follow the source or object entry 
being placed in the source or object library. 






~ 





The FILE parameter identifies the file for a file-to-library or library-to-file copy. The filename must 
match the filename on the FILE statement. 





The optional RECL parameter specifies the size of the records for a file-to-library or library-to-file copy. 
Only 80- or 96-column card-image records are allowed. If this parameter is omitted, 96 is assumed. 






The // ENTRY statement identifies the library entry to be copied to a file. Any number of these 
statements can precede the // NEND statement. 






The // NEND statement must follow the // ENTRY statements to terminate the copy to file. 






The optional NEWNAME parameter indicates the name you want to use for entries being put in the library. 
If this parameter is omitted, the name in the NAME parameter is used. 










Code 





Meaning 







XXX XXX Name to be used for entry. 








ccece Beginning characters of names for entries. The number of characters (up to five) must 
be the same number as in the NAME-ccccc. ALL parameter. 






The optional OMIT parameter indicates which entries are to be omitted when printing directory entries. 








Code 





Meaning 







XXXXXX Omit the entry specified by xxxxxx. 





ccccc.ALL Omit all entries with the beginning characters ccccc. 






Figure 3-15 (Part 4 of 4). Control Statements Required for the Copy Function of the Library Maintenance Program 


Delete Modify 


The delete function deletes temporary and permanent The modify function: 
entries from a fibrary. 


@ Reserializes a source library entry 
The control statements required for the delete function 


are shown in Figure 3-16. The numbered list corresponds ® Lists the statements in a source library entry 
to the numbered items in the figure. 
@ Removes statements from a source library entry 


@ Replaces source library statements 


@ Inserts statements into a source library entry 
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// LOAD $MAINT, 








R2 ALL 


S 
1 | . G P 3 | XXXXXX G3 T 
// DELETE FROM. E2 ,LIBRARY-< O iNAME- ¢ cceec.ALL [,RETAIN- P | ] 
R 
A 





Item Explanation 

_ eee 
ol The FROM parameter indicates the location of the library that contains the entries to be deleted. 
B The LIBRARY parameter indicates the type of entries to be deleted. 









Code Meaning 













S) 





Source statements (source library) 





OCL procedures (source library) 












O 





Object programs (object library) 













R 





Routines (object library) 





ALL 





All types of entries (S, P, O, R) 





3 | The NAME parameter identifies the entries to be deleted. 











Code 





Meaning 






XXXXXX Name of the library entry. 





ceecc.ALL Entries that have names beginning with the indicated characters (up to five) of the type 
indicated in the LIBRARY parameter. 







ALL All entries of the type indicated in the LIBRARY parameter. NAME-ALL cannot be used 
with LIBRARY-ALL. 










Gg The optional RETAIN parameter indicates the designation of the entries to be deleted. 





Code 





Meaning 






T Temporary 
P Permanent 









If RETAIN is omitted, T is assumed. 


Figure 3-16. Control Statements Required for the Delete Function of the Library Maintenance Program 
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The control statements required for the modify function 
are shown in Figure 3-17. The numbered list corresponds 
to the numbered items in the figure. 


// LOAD SMAINT, 


// RUN 


// MODIFY NAME-xxxxxx,FROM- ,LIBRARY- 


6 | YES 8 | 


RESER- JN > Hey | 
é No no | | LSEQFLD | o206 | 


ONLY 


10 


// REMOVE FROM-n...n,TO-n... 


// a FROM-n...n,fO-n... 
Statements to replace those removed 
//INSERT AFTER-n.. on 

“a to be inserted 


//CEND 


// END 





Item Explanation 


The MODIFY statement initiates the modification by describing the source library entry. 


The NAME parameter identifies the name of the entry being modified. This is the name that 
identifies the entry in the library directory. 


The FROM parameter indicates the location of the library that contains the entry to be modified. 
The LIBRARY parameter indicates the type of library entry to be modified. 
Code Meaning 


Ss Source statements (source library) 
P OCL procedures (source library) 


The WORK parameter indicates the location of the 5444 simulation area containing the space to be 
used as a work area. 





Figure 3-17 (Part 1 of 2). Control Statements Required for the Modify Function of the Library Maintenance Program 
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Item Explanation 


The optional RESER parameter indicates whether reserialization should be done when the entry is placed 
back in the source library. 












Code Meaning 








YES Reserialization is to be done. 





NO Reserialization is not to be done. 







Reserialization only; no other maintenance is done. When this is coded, no REMOVE, 
REPLACE, INSERT, or CEND statements can be entered. 







If this parameter is omitted, NO is assumed. 







The optional LIST parameter allows you to fist the source library entry as the modified entry is placed 
back in the source library. If this parameter is omitted, NO is assumed. 





8 | The optional SEQFLD parameter identifies the start and end positions of the field that contains the 
sequence number. The sequence number can be up to eight digits long. The start position is entered first 
(xx), then the end position (yy). If this parameter is omitted, 9296 is assumed. 






9 | The optional INCR parameter indicates the increment value for the sequence field if reserialization 
(RESER-YES or RESER-ON LY) is specified. The value can be up to five digits. If this parameter is 
omitted, 10 is assumed. 









The REMOVE statement deletes all Statements between and including the FROM and TO sequence 
numbers. 












The REPLACE statement replaces all statements between and including the FROM and TO sequence 
numbers. The statements replacing the statements being removed immediately follow the REPLACE 
statement. 










The INSERT statement inserts the supplied statements after the statement identified by the AFTER 
parameter. The statements to be inserted immediately follow the INSERT statement. 





The CEND statement must follow the control statements to terminate the modify function. 





Figure 3-17 (Part 2 of 2). Control Statements Required for the Modify Function of the Library Maintenance Program 


Rename 1000-FILE VTOC CONVERSION PROGRAM 
The rename function changes the names of library entries. This program is used to convert a 50-file VTOC (volume 
table of contents) on a 5445 to a 1000-file VTOC. The 
The control statements required for the rename function Program can also be used to convert a 1000-file VTOC on 
are shown in Figure 3-18. The numbered list corresponds a 5445 to a 50-file VTOC, assuming that there are 50 or 
to the numbered items in the figure. fewer files in the VTOC. Fora description of these functions, 


see /BM System/3 Model 15 System Control Programming 
Reference Manual, GC21-5077. 
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// LOAD $MAINT, 






R B 


// RENAME FROM- s ,LIBRARY- 


R2 





MANES cecec.ALL ‘NEWNAME: ccccc 


Bi XXXXXX cy | 


DoOTvTM 














Explanation 


The FROM parameter identifies the location of the library that contains the entry to be renamed. 






The LIBRARY parameter identifies the type of library entry to be renamed. 





Code Meaning 






S Source statements (source library) 






OCL procedures (source library) 








Oo 





Object programs (object library) 





R Routines (object library) 





The NAME parameter identifies the entry to be renamed. 





Code Meaning 








XXXXXX Current name of the entry to be renamed. This is the name that identifies the entry in the 
library directory. 







ceccc.ALL Entries that have names beginning with the indicated characters (up to five) of the type 
indicated in the LIBRARY parameter. 






gO The NEWNAME parameter indicates the new name of the entry to be renamed. 





Code Meaning 









XXXXXX New name to be given to entry. 





Beginning characters (up to five) of names to be given to entries. 


Figure 3-18. Control Statements Required for the Rename Function of the Library Maintenance Program 
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For any disk with a 1000-file VTOC (5445 or 3340), this The control statements required to do this compression are 
Program can be used to compress the entries in the VTOC. shown in Figure 3-19. The numbered list corresponds 

All file entries are moved to the beginning of the VTOC, to the numbered item in the figure. 

thus decreasing the time required to locate a particular file. 


// LOAD $WVTOC, 


// COMPRESS PACK-name,UNIT- 


Item Explanation 
| ~~ | 


a The PACK parameter (PACK-name) tells the program the name of the data module on which the VTOC 


is to be reformatted. The 1000-file VTOC conversion program compares the name in the PACK parameter 
with the one on the data module to ensure that they match. In this way the program ensures that it is 
using the right data module. 


The UNIT parameter (UN!T-code) tells the program the location of the data module on which the VTOC 
is to be compressed. Codes for the possible locations are as follows: 


Code Meaning 

D1 Data module on 3340 drive 1 
D2 Data module on 3340 drive 2 
D3 Data module on 3340 drive 3 


D4 Data module on 3340 drive 4 





Figure 3-19. Control Statements Required to Compress File Entries in the VTOC Using the 1000-File VTOC Conversion Program 
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The 1000-file VTOC conversion program compresses a 
1000-file capacity VTOC. For improved performance in 
file access time, all file entries are moved to the beginning 
of the volume table of contents. 


Note: All active files are retained as active after the VTOC 

is compressed. The program is also used to convert a 50-file 
VTOC to a 1000-file VTOC for a5445. For a description 

of this function, see /BM System/3 Model 15 System Control 
Programming Reference Manual, GC21-5077. 


The // COMPRESS PACK-name, UNIT-code contro! 
statement moves all active file directory entries in a 
1000-file capacity disk to the beginning of the VTOC. 


The following example shows the control statements needed 
to compress a 1000-file VTOC. 











Explanation: 
® The data module containing the VTOC to be compressed 
is named 00003 (PACK-00003 in the COMPRESS state- 


ment). 


@ The removable data module containing the VTOC to be 
compressed is on drive 3 (UNIT-D3). 
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Reassign Alternate Track Program ($RSALT) 


When it is necessary to transport a 3340 data module from 
System/3 to System/360 or System/370, the reassign 
alternate track program (SRSALT) must be used prior 

to using the DOS/OS initialization program. 


On a 3340 data module initialized on System/3, there are 
40 alternate tracks on cylinders 167 and 168. Ona 
System/360 or System/370 3340 data module, there are 
24 alternate tracks on cylinders 208 and 209. $RSALT 
moves the System/3 alternate tracks from cylinders 167 
and 168 to cylinders 208 to 209. Consequently, there 

is a restriction that if a 3340 data module initialized on 
System/3 has more than 24 defective primary tracks, it 
cannot be initialized by System/360 or System/370. 


The control statements required for this system service 
program are shown in Figure 3-20. The numbered list 
corresponds to the numbered items in the figure. 


Note: Data interchange is not supported between the 
System/3 and 360/370 systems, so this program cannot be 
used for that purpose. System/3 data existing on the data 
module prior to running $RSALT will be lost. 


// LOAD $RSALT, 


// RUN 


1 code Ba 


// ALTA UNIT-  { ‘codes’$ — |PACK- Hee i 
ALL names 


//END 


Item Explanation 


The UNIT parameter (UNIT-code) tells the focation of the 3340 data module that you want to modify. 
The program can modify up to three data modules during a program run. The form of the UNIT 
parameter depends on the number of data modules that you want modified. 


@ For one data module, use UNIT-code. 
@ For three data modules, use UNIT-ALL. 
@ For two or three data modules, use UNIT-‘code, code, code’. 
The codes indicate the location of the data modules: 
Code Meaning 
D2 Modify data module on 3340 drive 2 
D3 Modify data module on 3340 drive 3 
D4 Modify data module on 3340 drive 4 


ALL Modify all of the preceding data modules 


$RSALT cannot be run on UNIT-D2 if the 5444 simulation areas (R2 and F2) are active. The operator 
control command, SIMULATE OFF, can be used prior to executing $RSALT. 


The PACK parameter (PACK-name) tells the program the name of the 3340 data module to be modified. 
The parameter length must not exceed six characters. It can contain any of the standard System/3 
characters except apostrophes, commas, or leading or embedded blanks. 


The first PACK parameter applies to the first disk listed in the UNIT parameter. The second PACK 
parameter applies to the second disk parameter, and so on. 


If UNIT-ALL is specified, the PACK parameter names must be specified as if the UNIT parameter had 
been ‘D2, D3, D4’. 


The reassign alternate track program compares the name in the PACK parameter with the name on the 
data module to ensure that they match. If the names do not match, the program halts with an error 
message. In this way, the program ensures that it is using the right data module. 





Figure 3-20. Control Statements Required for Reassign Alternate Track Program 
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The following illustration shows examples of control state- 
ments required to execute the $RSALT program. 














Explanation: The 3340 data module on drive 4 is to be 
modified to System/360 —- Systemn/370 format. 
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Explanation: The 3340 data modules on drives 3 and 4 are 
to be modified to System/360 -- System/370 format. 


























Explanation: The 3340 data modules on drives 2, 3, and 4 
are to be modified to System/360 — System/370 format. 
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RPG II 


Using RPG II (Program Number 5704-RG1), you can proc- 
ess files on the data modules. The file description specifica- 
tions define the control information and device entry for 
the data module to the RPG I! compiler. Columns 40-46 
of this form identify the input/output device for the file. 


The main data area is referenced by specifying DISK40 or 
DISK45 in columns 40-46. If device independent data 
Management is used, these columns are left blank. At exe- 
cution time, you can assign the device independent files to 
a 3340 by using a FILE OCL statement. Sequential, direct, 
and indexed file processing are supported for the main data 
area. Device independent data management supports only 
sequential files. 


The 5444 simulation area is referenced by specifying DISK 
in columns 40-46 of the file description specifications. 
Sequential and direct file processing are supported for the 
simulation areas. However, index processing and multi- 
volume processing are not supported for the 5444 simula- 
tion areas. 


Work files for the compiler can reside on either the main 
data area or a 5444 simulation area. 


SUBSET ANS COBOL 


Using the subset ANS COBOL compiler and library program 
product (Program Number 5704-CB1), you can process files 
on the data modules. The ASSIGN clause is used to assign 
files to the 3340. The main data area is referenced by speci- 
fying 3340 or 5445; the 5444 simulation area is referenced 
by specifying 5444, 


Sequential, indexed, and direct files are supported on the 
main data area. Only single-volume sequential and direct 
files are supported on the 5444 simulation areas. 


Work files for the compiler can reside in either the main 
data area or a 5444 simulation area. 
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FORTRAN IV 


Using FORTRAN IV (Program Number 5704-F01), you 
can process files on the data modules. The main data area 
is referenced by specifying 5445: the simulation area is 
referenced by specifying 5444. Work files for the compiler 
can reside in either the main data area or a 5444 simulation 
area. 


BASIC ASSEMBLER 


The SCP macros that presently support the 5445 are avail- 
able to assist the programmer in using the 3340 main data 
area. Work files for the assembler can reside on either the 
main data area or a 5444 simulation area. 


DISK SORT 


During the sorting process, the disk sort program (Program 
Number 5704-SM1) requires a minimum of three files: in- 
put, output, and work. These files can reside in either the 
main data area or a 5444 simulation area of a 3340. The 
input file contains the records to be sorted. The output file 
contains the sorted records. The work file is an area on the 
data module which is set aside as a work area. If the work 
file is a multivolume file, all of the volumes are described 
on the OCL FILE statement. The parameters for the FILE 
statement are described in Chapter 2 of this manual. The 
location of the work file can also be determined automati- 
cally. Directed automatic work file allocation uses the 
SWITCH statement to determine the location of the work 
file. 
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Appendix A. 3348 Data Module Surface Format 


The IBM 3348 Data Module (Model 70) contains six data 
surfaces. Each data surface has two read/write heads and 
is divided into 700 concentric data bands called tracks 
(Figure A-1), Each of the two read/write heads on a data 
surface is associated with a track. There are 350 access 


positions for the 700 tracks. 
1 Track, 48 Records 





Figure A-1. Data Surface Track Layout 


3348 Data Surface Format A-1 
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On the 5444 and 5445 disk drives, the tracks that can be Figure A-2 shows the difference between the 3340 as used 
accessed without repositioning the read/write heads on the System/3 and as used on the System/370, assuming 
comprise a physical cylinder. Since the 3340 data module a physical record length of 256 bytes. 
has 12 read/write heads on the access mechanism, there 
would be 12 tracks per physical cylinder. However, to be A record (sector) can contain one or more logical records, 
consistent with the 5445 addressing technique—when and a logical record can span one or more records (sectors). 
cylinders are mentioned in connection with the 3340 as Thus, using IBM programming support, a logical record can 
used on System/3—the cylinders are logical cylinders, not range from 1 through 32,768 bytes. 
physical cylinders, and there are 20 tracks per logical 
cylinder. Therefore, to access all 20 tracks of this logical At one position of the access mechanism, the following can 
cylinder the access mechanism must be moved. Five 3340 be accessed: 
access positions (physical cylinders) are equal to three 
System/3 logical cylinders or 60 tracks. 12 tracks 

576 records (sectors) 
In this and other System/3 publications, track is used to 147,456 bytes 


refer to a logical, not physical, 3340 track; and cy/inder is 
used to refer to a logical 3340 cylinder. 


Each track contains 48 records, except cylinder 0, which is 
formatted differently. Each record contains 256 bytes. (A 
record on the 3340 is similar to a sector on a 5444, and is 
sometimes referred to as a sector in the System/3 publications 
and programming support.) A disk address referred to as 
CCHHR has the same meaning for the 3340 as for the 5445 
(CC = cylinder number, HH = head [track] number, R = 
record number). 


a 


Access positions 350 positions 350 positions 


































One access position 2 cylinders 0.6 cylinders 
Six surfaces (4 disks) 1 cylinder 6 tracks 
Two read/write heads per surface 2 cylinders 12 tracks 

Five access positions 10 cylinders 3 cylinders 















Addressable cylinders per module 700 cylinders 210 cylinders 











Addressable tracks per cylinder 12 tracks 20 tracks 












Byte capacity per track 5,120 bytes 12,288 bytes 















Byte capacity per cylinder 61,440 bytes 245,760 bytes 












Byte capacity per data module (approximate) 43 Mb! 51 Mb 


1This assumes System/3 record length and one physical block per physical track. The 3348 Model 70 used on a System/370 can store up 
to 70 megabytes. The 3348 Data Module Model 35 and Model 7O0F cannot be used on System/3. 






Figure A-2. A Comparison of the 3340 as Used on the System/370 with the 3340 as Used on the System/3 
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The factors that contro! file size are explained in the /BM 
System/3 Disk Concepts and Planning Guide, GC21-7571. 
The structure of a file on the 3340 main data area (sequential, 
direct, or indexed) is virtually identical to the structure of a 
file on the 5445. The 3340 contains 48 records per track 

and 166 cylinders of main data area per pack while the 

5445 contains 20 records (sectors) per track and 200 cylin- 
ders per pack. 


Following is a list of similarities between the 5445 and the 
3340: 


@ Index entries are calculated using the following formula: 
key length + 4. 


@ Index and data areas are contained on whole tracks. 


® Indexed files with indexes of 16 tracks or more have 
space reserved for a track index. 
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Appendix B. Calculating File Size 


@ Spanned records are used. 


© The index area must have at least one extra record (sec- 
tor) for a delimiter or at least three extra records (sectors) 
if additions will be made to the file. 


@ There are 20 tracks per cylinder (3980 tracks on the 
5445; 3320 tracks of main data area on the 3340). 


The following tables and discussion include the specific 
information necessary to evaluate file size on the 3340. 
DATA AREA TRACK REQUIREMENTS 

Sequential, direct, and indexed data areas are all structured 
the same. Figure B-1 shows the number of tracks needed to 


store a given number of logical records, using various logical 
record lengths. 


Calculating FileSize 8-1 


NUMBER OF TRACKS! 














Number of Logical Record Logical Record Logical Record Logical Record Logical Record 
Logical Length 50 Length 64 Length 100 Length 128 Length 256 
500 5 3 7 3 10 5 13 6 25 11 
1000 10 5 13 6 20 9 25 11 50 21 
1500 15 7 19 8 30 13 38 16 75 32 
2000 20 9 25 11 40 17 50 21 100 42 
2500 25 11 32 14 49 21 63 27 125 53 
3000 30 13 38 16 59 25 75 32 150 63 
3500 35 15 44 19 69 29 88 37 175 73 
4000 40 17 50 21 79 33 100 42 200 84 
4500 44 19 57 24 88 37 113 47 225 94 
5000 49 21 63 27 98 41 125 53 250 105 
5500 54 23 69 29 108 45 138 58 275 115 
6000 59 25 75 32 118 49 150 63 300 125 
6500 64 27 82 34 127 53 163 68 325 136 
7000 69 29 88 37 137 57 175 73 350 =146 
7500 74 31 94 40 147 62 188 79 375 157 
8000 79 33 100 42 157 66 200 84 400 167 
8500 84 35 107 45 167 70 213 89 425 178 
9000 88 37 113 47 176 74 225 94 450 188 
9500 93 39 119 50 186 78 238 99 475 198 
10,000 98 41 125 53 196 82 250 105 500 38209 
10,500 103 43 132 55 206 86 263 110 525 219 
11,000 108 45 138 58 215 90 275 115 550 = =230 
11,500 113 47 144 60 225 94 288 120 575 240 
12,000 118 49 150 63 235 98 300 125 600 250 
12,500 123 51 157 66 245 102 313 131 625 261 
13,000 127 53 163 68 254 106 325 136 650 39.271 
13,500 132 55 169 71 264 110 338 141 675 282 
14,000 137 57 175 73 274 114 350 146 700 8 292 
14,500 142 60 182 76 284 119 363 152 725 303 
15,000 147 62 188 79 293 123 375 157 730-3313 
15,500 152 64 194 81 303 127 388 162 775-3323 
16,000 157 66 200 84 313 131 400 167 800 = 334 
16,500 162 68 207 86 323 135 413 172 825 344 
17,000 167 70 213 89 333 139 425 178 850 = 355 
17,500 171 72 219 92 342 143 438 183 875 365 
18,000 176 74 225 94 352 147 450 188 900» =3375 
18,500 181 76 232 97 362 151 463 193 925 386 
19,000 186 78 238 99 372 155 475 198 950 396 
19,500 191 80 244 102 381 159 488 204 975 407 
20,000 196 82 250 105 391 163 500 209 1000 «417 
21,000 206 86 263 110 411 171 525 219 1050 38438 
22,000 215 90 275 115 430 180 550 230 1100 459 
23,000 225 94 288 120 450 188 575 240 1150 480 
24,000 235 98 300 125 469 196 600 250 1200 500 
25,000 245 102 313 131 489 204 625 261 1250 521 
26,000 254 106 325 136 508 212 650 271 1300 542 
27,000 264 110 338 141 528 220 675 282 1350 563 


The number of tracks for data records does not include indexes. For the 3340, this is the main data area, not the 5444 simulation area. 


Figure B-1 (Part 1 of 2). Disk Requirements for Data Records 
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NUMBER OF TRACKS! 




















Number of Logical Record Logical Record Logical Record Logical Record Logical Record 
Logical Length 50 Length 64 Length 100 Length 128 Length 256 
Records 3340 5445 3340 5445 3340 5445 | 3340 
28,000 274 114 350 146 547 228 700 292 1400 584 
29,000 284 119 363 152 567 237 725 303 1450 605 
30,000 293 123 375 157 586 245 750 313 1500 625 
31,000 303 127 388 162 606 253 775 323 1550 646 
32,000 313 131 400 167 625 261 800 334 1600 667 
33,000 323 135 413 172 645 269 825 344 1650 688 
34,000 333 139 425 178 665 277 850 355 1700 709 
35,000 342 143 438 183 684 285 875 365 1750 730 
36,000 352 147 450 188 704 293 900 375 1800 750 
37,000 362 151 463 193 723 302 925 386 1850 771 
38,000 372 155 475 198 743 310 950 396 1900 792 
39,000 381 159 488 204 762 318 975 407 1950 813 
40,000 391 163 500 209 782 326 1000 417 2000 834 
41,000 401 167 513 214 801 334 1025 428 2050 855 
42,000 411 171 525 219 821 342 1050 438 2100 875 
43,000 420 175 538 224 840 350 1075 448 2150 896 
44,000 430 180 550 230 860 359 1100 459 2200 917 
45,000 440 184 563 235 879 367 1125 469 2250 938 
46,000 450 188 575 240 899 375 1150 480 2300 959 
47,000 459 192 588 245 918 383 1175 490 2350 980 
48,000 469 196 600 250 938 391 1200 500 2400 1000 
49,000 479 200 613 256 958 399 1225 511 2450 1021 
50,000 489 204 625 261 977 407 1250 521 2500 1042 
75,000 733 306 938 391 1465 611 1875 782 3750 1563 
100,000 977 407 1250 521 1954 814 2500 1042 5000 2084 
125,000 1221 509 1563 652 2442 1018 3125 1303 6250 2605 
150,000 1465 611 1875 782 2930 1221 3750 1563 7500 3125 
175,000 1709 713 2188 912 3418 1425 4375 1823 8750 3646 
200,000 1954 814 2500 1042 3907 1628 5000 2084 10,000 4167 





the number of tracks for data records does not include indexes. For the 3340, this is the main data area, not the 5444 simulation area. 


Figure B-1 (Part 2 of 2). Disk Requirements for Data Records 


Calculating FileSize B-3 


INDEX AREA TRACK REQUIREMENTS Key- File Capacity (Number of Logical Records) 








Length 5445 3340 
Indexed files also require tracks for the file index. The 
following chart shows how many keys can be contained on 1 1,040,400 5,992,704 
one track of the file index. 2 705,600 4,064,256 
3 518,400 2,985,984 
Key- Number of Keys Per Index Track 4 409,600 2,359,296 
Length 5445 3340 5 313,600 1,806,336 
6 250,000 1,440,000 
1 1020 2448 7 211,600 1,218,816 
2 840 2016 8 176,400 1,016,064 
3 720 1728 9 144,400 831,744 
4 640 1536 10 129,600 746,496 
5 560 1344 11 115,600 665,856 
6 500 1200 12 102,400 589,824 
7 460 1104 13 90,000 518,400 
8 420 1008 14 78,400 451,584 
9 380 912 15 67,600 389,376 
10 360 864 16 57,600 331,776 
11 340 816 17 57,600 331,776 
12 320 768 18 48,400 278,784 
13 300 720 19 48,400 278,784 
14 280 672 20 40,000 230,400 
15 260 624 21 40,000 230,400 
16 240 576 22 32,400 186,624 
17 240 576 23 32,400 186,624 
18 220 528 24 32,400 186,624 
19 220 528 25 25,600 147,456 
20 200 480 26 25,600 147,456 
21 200 480 27 25,600 147,456 
22 180 432 28 25,600 147,456 
23 180 432 29 19,600 112,896 
24 180 432 
25 160 384 
26 160 384 Figure B-2. File Capacity for One Track of Disk Track Index 
27 160 384 
28 160 384 
29 140 336 


Since there is one key for each logical data record in the 
file, the number of tracks required for the file index is 
easily calculated for a given number of logical records. 


The index area also includes a disk track index if the file 
index requires 16 or more tracks. Figure B-2 shows the 
file sizes supported by one track of the disk track index for 
various key lengths. 


B-4 
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TRACK USAGE FOR INDEXED FILES 


When loading an indexed file, you specify either the number 
of records in the file or the number of tracks. When you 
specify the number of tracks, the system determines how 

the specified space is to be split among data tracks, file index 
tracks, and disk track index tracks. Figure B-3 illustrates 
how the system splits an area on the 3340 when the 
TRACKS parameter is used in the OCL statement, and 
illustrates the maximum record Capacities for various size 
indexed files. Remember to use the smaller of the two 
numbers: number of keys, or number of logical data records. 






Logical Number of Number of 



















Number of Key Record Disk Track File Index Number of Number of Logical Data 
Tracks Length Length Index Tracks Data Tracks Keys Records 

5 5 64 1 4 1,316 768 
5 5 128 1 4 1,316 384 
5 5 256 1 4 1,316 192 
5 10 64 1 4 846 768 
5 10 128 1 4 846 384 
5 10 256 1 4 846 192 
10 5 64 2 8 2,660 1,536 
10 5 128 1 9 1,316 864 
10 5 256 1 9 1,316 432 
10 10 64 2 8 1,710 1,536 
10 10 128 1 9 846 864 
10 10 256 1 9 846 432 
50 5 64 7 43 9,380 8,256 
50 5 128 4 46 5,348 4,416 
50 5 256 2 48 2,660 2,304 
50 10 64 9 41 7,758 7,872 
50 10 128 5 45 4,302 4,320 
50 10 256 3 47 2,574 2,256 
100 5 64 13 87 17,444 16,704 
100 5 128 7 93 9,380 8,928 
100 5 256 4 96 5,348 4,608 
100 10 64 1 18 81 15,534 15,552 
100 10 128 10 90 8,622 8,640 
100 10 256 6 94 5,166 4,512 
500 5 64 1 63 436 84,644 83,712 
500 5 128 1 34 465 45,668 44,640 
500 5 256 1 18 481 24,164 23,088 
500 10 64 1 91 408 78,606 78,336 
500 10 128 1 50 449 43,182 43,104 
500 10 256 1 27 472 23,310 22,656 
1,000 5 64 1 125 874 167,972 167,808 
1,000 5 128 1 67 932 90,020 89,472 
1,000 5 256 1 35 964 47,012 46,272 
1,000 10 64 1 182 817 157,230 156,864 


Figure B-3 (Part 1 of 2). Sample Record Capacities of Indexed Files 
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Logical Number of Number of 

Number of Key Record Disk Track File index Number of Number of Logical Data 
Tracks Length Length Index Tracks Data Tracks Keys Records 
1,000 10 128 1 100 899 86,382 86,304 
1,000 10 256 1 53 946 45,774 45,408 
2,000 5 64 1 250 1,749 335,972 335,808 
2,000 5 128 4 134 1,865 180,068 179,040 
2,000 5 256 1 69 1,930 92,708 92,640 
2,000 10 64 1 364 1,635 314.478 313,920 
2,000 10 128 1 200 1,799 172,786 172,704 
2,000 10 256 1 106 1,893 91,566 90,864 
3,000 5 64 1 375 2,624 503,972 503,808 
3,000 5 128 1 200 2,799 268,772 268,704 
3,000 5 256 1 104 2,895 139,748 138,960 
3,000 10 64 1 546 2,453 471,726 470,976 
3,000 10 128 1 300 2,699 259,182 259,104 
3,000 10 256 1 158 2,841 136,494 136,368 
3,320 5 64 1 415 2,904 557,732 557,568 
3,320 5 128 1 222 3,097 298,340 297,312 
3,320 5 256 1 115 3,204 154,532 153,792 
3,320 10 64 1 604 2,715 521,838 521,280 
3,320 10 128 1 332 2,987 286,830 286,752 
3,320 10 256 1 175 3,144 151,182 150,912 


Figure B-3 (Part 2 of 2). Sample Record Capacities of indexed Files 


CORE INDEX Key Number of Logical Records (in 1000s) 


Length 2 5 8 10 15 20 #50 





The core index is a table of pointers to the index tracks of 
an indexed file. The core index is built just before your 4 12 24 36 42 60 84 198 
COBOL or RPG II program is executed and contains, at 5 14 28 42 56 84 105 266 
most, one entry for each index track. Figure B-4 shows the 6 16 40 56 72 104 136 336 
number of bytes of main storage required for a core index 7 18 45 72 90 126 171 414 
that provides the most efficient random processing of an 8 20 50 80 100 150 200 500 





indexed file, using key length and number of logical records 9 33. 66 99 121 187 242 605 
as variables. 10 36 72 120 144 216 288 696 
11 39. 91 130 169 247 325 806 
12 42 98 154 196 280 378 924 
CALCULATING FILE SIZES — SUMMARY 13 45 105 180 210 315 420 1,050 
14 48 128 192 240 368 480 1,200 
This section contains step-by-step explanations of some 15 68 153 221 289 425 561 1,377 
common calculations of file sizes. 16 72, 162 252 324 486 630 1,566 
17 76 #171 266 342 513 665 1,653 
18 80 200 320 280 580 760 1,900 
Determining the Number of Tracks in a Sequential or 19 84 210 336 399 609 798 1,995 
Direct File 20 110 242 374 462 704 924 2,310 
1. Number of logical records x logical record length = Figure B-4. Core Index Sizes in Bytes for 3340 Single Volume 
number of characters Indexed Files 
2. Number of characters (from step 1) 
12,288 (number of characters/track) lt ia 
tracks (round 
to the next 
highest whole 
number) 
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Determining the Number of Tracks in an Indexed File 


To determine the number of data tracks in an indexed file, 
the following two steps should be used: 


1. Number of logical records x logical record length = 
number of characters 


2. Number of characters (from step 1) _ 


12,288 (number of characters/track) number of 


data tracks 
(round to the 
next highest 
whole number) 


The following four steps should then be followed to deter- 
mine the number of file index tracks in an indexed file: 


1 Key length + 4 = index length 


2. 256 (number of characters/record) 
= ~number of 
Index length (from step 1) : 
entries per 
record (drop 
remainder) 


3. Number of logical records 
Number of entries per rec- 


ord (from step 2) 


= number of records 
(round to the next high- 
est whole number; then, 
add one record for a 
delimiter, and two or 
more additional records 
if you plan to add logi- 
cal records to the file 
later) 


4. Number of records (from step 3) 


= b f . 
48 (number of records/track) number of index 


tracks (round to 
the next highest 
whole number) 


Determining the Number of Tracks of Disk Track Index 


If an indexed 3340 file has more than 15 index tracks (from 
step 4 in the preceding calculation), the file will have a 

disk track index in addition to the file index. The follow- 
ing two steps should be used to determine the number of 
tracks needed for the disk track index: 


1. Number of index tracks (greater than 15) 7 
Number of entries per record (from step 
2 of the preceding calculation) 


number 
of rec- 
ords 
(round 

to the 
next high- 
est whole 
number) 


2. Number of records (from step 1) - 


€ dij 
48 number of disk 


track index tracks 
(round to the next 
highest whole 
number) 


The total number of tracks in a 3340 indexed file can be 
determined by adding the number of data tracks, the num- 
ber of file index tracks, and the number of disk track index 
tracks. 


Converting Cylinder/Track to Track Number 
To convert cylinder/track to track number, multiply cylinder 


number by the number of tracks on each cylinder and add 
track number. 


Examples: 


5444 5445 
6/1 = cylinder/track 
6x2+1=13 

13 = track number 


6/1 = cylinder/track 
6x 20+1=121 
121 = track number 


3340 
6/1 = cylinder/track 


6x 20+1=121 
121 = track number 


Converting Track Number to Cylinder/Track 
To convert track number to cylinder/track, divide track 


number by the number of tracks on a cylinder. The quo- 
tient is the cylinder and the remainder is the track. 


Examples: 
5444 5445 
121 = track number 


121 + 20 = 6 (remainder 1) 
6/1 is the cylinder/track 


13 = track number 
13 +2 = 6 (remainder 1) 
6/1 is the cylinder/track 


3340 
121 = track number 


121 + 20 = 6 (remainder 1) 
6/1 is the cylinder/track 
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3340 OPERATOR PANEL 





er 


Leer Tg Ready 
Locked 


evel eter) 





START 
1 
STOP 








Ready Indicator 

The Ready indicator lights when the data module is proper- 
ly inserted and ready for operation. 

START/STOP Switch 

With the switch in the START position, the cover is locked, 


the data module is loaded, and the heads are moved to track 
0, provided that: 


1. The drive power is on. 
2. The data module is in place. 
3. The cover is closed and latched. 


When the switch is placed in the STOP position, the data 
module is unloaded and the cover is unlocked. The data 
module will not unload while the system is communicating 
with the drive or when an Attention is pending. 


Read Only Indicator 


The Read Only indicator lights when the write function is 
inhibited after the data module is loaded. Write is inhibited 
by enabling the read only function on the data module (see 
Read Only Function in this appendix). 





Appendix C. Operating Instructions 


Cover Locked Indicator 

The Cover Locked indicator lights when the drive cover is 
locked. 

Attention Pushbutton 


Operating the Attention pushbutton causes the drive to 
perform a rezero operation: 


T: Read/write heads are moved to track 0. 


2. DM (data module) Attention is signaled to the 
controller. 


33 Drive is placed online and CE mode is reset (after 
completion of CE maintenance). 
3340 POWER PANEL 


3340 Model A2 


er aaa 
Power On ] 


' Power Off 





Power On Pushbutton 


Operation of the Power On pushbutton allows ac power to 
be applied to the 3340 provided subsystem power is pres- 
ent. During a system power-up operation, it is not necessary 
to press this pushbutton. 
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Power Off Pushbutton 


Operation of the Power Off pushbutton removes ac power 
from the 3340 when system power is up. During a system 


power-down operation, it is not necessary to press this push- 


button. 

Note: Do not use Power On/Power Off switches to load 

or unload the data module. 

DATA MODULE LOADING 

1. Place the START/STOP switch in the STOP position. 

2. Open the top cover. 

3. With the data module doorway facing the rear of the 
drive, lower the data module into the drive shroud 
recess until it is seated. 

4, Close the top cover. 

5. Place the START/STOP switch in the START posi- 
tion. The Cover Locked indicator will light indicat- 
ing the start of the load sequence. 

6. The data module is automatically loaded. After 20 
seconds, the Ready indicator will light to show the 
drive is ready. This also forces a pack change device 
end interrupt to the storage control. 

Note: Correct loading of the data module depends on: 1) 


Proper alignment of the data module in the drive shroud 
recess, and 2) the 3340 top cover being fully closed. 


DATA MODULE UNLOADING 
1. Place the START/STOP switch in the STOP position. 


2. When the Cover Locked indicator goes out, open the 
top cover. 


3. Lift the data module from the drive. 
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Cover 
Locked 








Operator Panel 





Opening Cover 





Load/Unload Data Module 


READ ONLY FUNCTION Disable Read Only Function 
The means to protect previously written data modules is 1. Press down on the [BM logo inset of the data module 


provided by the read only function. The following proce- handle. 
dures show how to enable or disable the read only function. 


Enable Read Only Function 


1. Press down on the IBM logo inset of the handle. Pe 





2: Turn inset 180° and snap into place so that the solid 
side of the inset is exposed as shown above. 





2. Turn inset 180° and snap into place until the hollow 
side of the inset is exposed as shown below. 


fo \F 
yr ey 
V6 


x 
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Hexadecimal 
ps eave 3) 














Hexadecimal 
Character Character fee 


Hexadecimal 
Character coe een 
“Taponrophe ad 


c as 
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oO 
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nn 
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access time: The time interval between the instant that 
transfer of data to/from the 3340 is requested and the in- 
stant that transfer begins. 


alternate track: A track designated to contain data in place 
of a defective track. 


data module: A sealed cartridge that contains disks, a 
spindle, read/write heads, and access arms. The IBM 3348 
Model 70 Data Module is used on the 3340. 


data surface: One side of a disk used for storage of data. 
The 3340 data module has six data surfaces. 


defect skipping: The ability to write data before and after 
a defect on a disk surface. This ability of the 3340 reduces 
the chance of an alternate track being assigned and thus 
eliminates the access time required to move the read/write 
heads to the alternate track. 


logical cylinder: Twenty tracks on the 3340 data module 
when used on the System/3. 


main data area: The main area of the 3340 used for stor- 
age of files. Each data module has one main data area that 
can store 40.8 million bytes of data. 


Glossary 


physical cylinder: All the tracks that can be accessed with- 
out repositioning the access mechanism. The 3340 data 
module has 12 tracks per physical cylinder. 


read/write head: The electromagnet used to read, write, or 
erase data on a disk surface. On the 3340, there are two 
read/write heads for each data surface. 


record: A fixed area of a track. Each record contains 256 
bytes of data. There are 48 records per track on the 3340 
data module. These records are similar to sectors on the 
5444 Disk Storage Drive. 


rotational delay: The time required for the desired record 
area to reach the read/write head so that data transfer can 
begin. 


simulation area: An area on the 3340 data module that 
simulates a 5444 disk storage drive. There are four simula- 
tion areas on each 3340 data module. 


track: The area accessible to one read/write head at one 
access position. There are 700 tracks on each data surface 
of a 3340 data module. Because there are two heads per 
data surface, two tracks on each surface are accessible at 
each access position. 


Glossary G-1 


G-2 


$ALT 3-5 
$BUILD 3-5 
$COPY 3-9 
$DCOPY 3-12 
$DELET 3-8 
$HIST 3-22 
SINIT 3-3 
$LABEL 3-7 


$MAINT 3-23 
$RSALT 3-34 
$SCOPY 3-15 
$WVTOC 3-31 


access 
methods supported 2-1 
motion time 1-2 
allocate 3-23 
alternate track assignment program 3-5 
alternate track rebuild program 3-5 
assembler 4-1 
attention pushbutton C-1 


basic assembler 4-1 
byte capacities 1-1 


calculating file size B-1 
CCP (see communication contro! program) 
communication control program 2-2 
configuration 

control unit 1-2 


drive 1-2 
models 1-3 
control 


statement for compressing a 1000-file VTOC 3-34 
statement for executing the S$RSALT program 3-36 
statement for 3340 simulation area program 3-18 
statement format 3-1 
unit 1-2 

converting 
cylinder/track to number B-7 
track numbers to cylinder/track B-7 

copy 3-23 

copy/dump program 3-9 

copyfile 3-10 

copypack 3-9 

core index B-6 

cover locked indicator C-1 

cylinder/track conversion to track number B-7 


Index 


data area track requirements B-1 
data modules 
definition of 1-1 
format 1-6 
loading C-2 
main data area 1-4 
physical characteristics 1-4 
simulation areas 1-6 
storage characteristics 1-4 
unloading C-2 
useof 1-4 
data surface format A-1 
DATE parameter 2-4 
defect skipping 1-1 


delete 3-28 

disk initialization program 3-1 
disk sort 41 

disk storage concept 1-1 
drive 1-2 


dump/restore program 3-12 


examples of control statements for 3340 simulation 
area program 3-18 


file 
and volume label display program 3-5 
delete program 3-6 
multivolume 2-1 
processing large indexed 2-2 
size calculation B-1 
VTOC conversion program 3-31 
work 2-2 
format 
of control statement 3-1 
of data module 1-6 
of data surface (3340) A-1 
FORTRAN IV 4-1 


HIKEY parameter 2-5 


index area track requirements B-4 
index,core B-6 

indexed files track usage B-5 
initial program load 2-2 

IPL (see initial program load) 


Index = X-1 


keyword parameter 
for single volume disk file 2-3 
for multivolume files 2-5 


LABEL parameter 2-3 

large indexed files processing 2-2 

library maintenance program 3-23 

loading data module C-2 

location of data modules and backup areas 3-14 
LOCATION parameter 2-4, 2-5 


main data area 1-4 
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